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DEFINITION 

The  FIREFLY  model  is  a  mathematical  technique,  adapted  to 
computer  calculation  because  of  a  need  for  the  ability  to  handle 
a  large  amount  of  data,  which  will  provide  estimates  of  fire  dam¬ 
age  resulting  both  directly  and  indirectly  from  the  detonation  of 
a  nuclear  weapon. 


GENERAL  DESCRIPTION 

The  main  task  of  FIREFLY  is  to  assess  the  total  damage  to  a 
real-world  set  of  buildings  from  the  initial  thermal  pulse  of  a 
nuclear  weapon  and  from  the  subsequent  spread  of  fire  from  those 
buildings  which  are  burning.  The  model  reads  a  great  deal  of 
data  about  the  size,  construction  characteristics,  fuel  loading, 
and  separation  distances  of  each  building,  structures  some  environ¬ 
mental  variables  concerning  wind  speed  and  direction  and  weapon 
placement,  and  calculates  the  fire  destruction  in  a  probabalistic 
sense. 

Two  internal  quantities  are  automatically  varied  to  provide 
a  spectrum  of  fire  damage  results.  The  first  of  these  quantities 
is  the  probability  of  exposed  room  ignition,  P^,  and  is  a  func¬ 
tion  of  the  total  thermal  energy  delivered  directly  to  a  "standard" 
room  sufficient  to  create  a  serious  enough  ignition  that  would  lead 
to  room  flashover.  The  second  quantity  is  the  angle  of  elevation 
of  the  weapon  fireball.  The  value  for  Pr^  is  dependent  upon  weapon 
yield,  height  of  burst,  atmospheric  visibility,  room  dwelling 
occupancy,  and  slant  range.  By  further  fixing  an  angle  of  fireball 
elevation,  any  preset  values  for  P  .  and  a;-  rle  clearly  represent 
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an  infinite  number  of  exogenous  conditions.  FIREFLY  generates 
five  values  of  Pr^  (0.1,  0.3,  0.5,  0.7,  0.9)  to  be  used  with 
each  of  three  angles  (5°,  106,  30°).  These  fifteen  cases,  each 
run  100  times  to  create  a  statistical  sample,  constitute  one  base 
case  opr"*?tion  of  the  model  'ring  one  wind  velocity.  After  about 
three  base  cases  have  been  conducted,  an  analyst  may  specify  exact 
exogeneous  conditions  (a  given  yield,  HOB,  visibility,  wind)  and 
interpolate  among  the  data  which  was  presented  for  the  spectrum  of 
variables.  The  charts  and  equations  necessary  to  calculate  the 
actual  value  of  Pr^  will  be  presented  in  the  final  report  to  be 
published  later  this  year. 

FIREFLY  deals  with  three  calculated  quantities: 


...  The  probability  of  the  complete  ignition  and  destruc¬ 
tion  of  a  flammable  building  from  the  thermal  pulse, 

ptp 

...  The  probability  that  a  burning  building  will  create 

sufficient  heat  energy  to  ignite  a  flammable  substance 
at  a  given  distance  (also  called  the  "probability  of 
jump"),  Pj. 

. . .  The  probability  of  ignition  and  destruction  of  a  build¬ 
ing  from  fire  spread  within  the  building  itself  (also 

called  the  probability  of  intra-building  spread),  p  . 

s 


The  quantity  pt 
fined  as 


is  calculated  for  each  building  and  is  de- 


1  -U  -Pri> 


N 
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where  N  is  the  number  of  ignition  points  and  is  itself  a  function 
of  size  of  the  building,  percent  window  openings,  size  of  the  win¬ 
dows,  degree  of  window  shading  (blinds,  etc.)*  and  degree  of  win¬ 
dow  shielding  (a  function  of  the  heights  of  surrounding  buildings 
and  the  fireball  elevation). 


Si 


The  value  for  p^  depends  upon  a  number  of  characteristics 
about  a  burning  building  (height,  roof  type,  window  openings),  the 
separation  distance  involved,  and  the  wind  speed  and  direction. 


The  quantity  p  is  a  function  of  fuel  loading,  exterior  wall 

D 

type,  floor  construction,  roof  construction  and  height. 

The  quantities  ptp  and  pg  for  a  particular  building  are  multi¬ 
plied  together  and  Monte  Carloed  against  a  random  number  to  deter¬ 
mine  if  that  particular  building  is  burning.  If  it  is  burning,  it 
becomes  a  candidate  to  spread  the  fire  to  any  nearby  building.  All 


pared  to  a  random  number.  If  it  is  then  determined  that  there  is 

sufficient  energy  present  at  any  building (s)  in  the  neighboring 

area,  the  value(s)  for  p  are  themselves  Monte  Carloed  to  find  which 

s 

of  them  are  destroyed. 

The  model  is  limited  by  present  computer  capability  to  a  maxi¬ 
mum  of  27  city  blocks  or  1080  buildings,  whichever  is  less.  Final 
answers  are  provided  for  each  of  the  fifteen  variations  of  pri  and 
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angle  as  a  result  of  100  runs  per  case  in  terms  of  the  total  number, 
percent  of  total,  and  standard  deviation  of 

...  buildings  destroyed  by  thermal  pulse 
...  buildings  destroyed  by  fire  spread 
. . .  total  of  the  above 


Revision*  and  Addition*  to  FIREFLY 
Augutt  14,  1966 

I.  Revision  of  Section  5  11 

1.1  Peg*  132 

l.!."*.  Addition  e/ter  KVW  i*  defined-* 

Svbol  Dimension  Meaning 

KW  1  Cod*  for  the  well  construction  com¬ 

bustibility.  Sec  Section  2  VII  F. 

1.1. b.  Repleces  first  line  of  fifth  symbol,  KW-  - 

Symbo 1  Dimension  Me  a  n i nq 

KWD  1  Generel  term  for  the  distance  in 

feet 

t.l.c.  Replaces  last  line  of  the  meaning  of  KWE1-4-- 
ea.'t.  See ‘KWD 

1.1. d.  Replaces  last  line  of  the  meaning  of  KWN1-4-- 
buildings  respectively.  See  KWD 

1.2  Pag*  133 

1. 2.  a.  Replaces  last  line  of  the  meaning  of  KWS1-4-- 
buildings  respectively.  See  KWD 

1.2. b.  Replaces  last  line  of  the  meaning  of  KWW1-4-- 
buildings  respectively.  See  KWD 

II.  Revision  of  Section  6,  FIREFLY  1 

Page  141 

Replaces  third  statement-- 

BANK,{0)  ,/BO/, WITH,  KV  CONS  ,  PERP ,  (  1 )  ,/Bl/ ,F IREFLY 1 , AGNT 

III.  Revision  of  Section  6,  FIREFLY  2 
II  1. 1  Pag*  167 

111.1. a.  Replaces  third  statement-- 
BANK,  (0)  ,/B0/ ,  ( 1 )  ,/Bl/ ,  FIREFLY2 

111.1. b.  Replaces  seventeenth  statement-- 
00  24  K«  1 ,  KK 

111.1. c.  Addition  after  eighteenth  statement  — 

24  CONTINUE 

111. 2.  Page  166 

111. 2.  a.  Replaces  ninth  statement — 

DO  121  K«1,KK 

111.2. b.  Addition  after  tenth  statement-- 
121  CONTINUE 

111. 3.  Pag*  175 

111. 3.  a.  Replaces  sixteenth  statement-- 
DO  8066  K>1,KX 

111.3. b.  Replaces  seventeenth  statement-- 

IP  (KR(I,J,K).EQ.()1  00  TO  8066 

111.3. V.  Addition  after  twenty-sixth  statement-- 


8066  CONTINUE 
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FOREWORD 


The  FIREFLY  Model  was  developed  for  the  Office  of  Civil 
Defense  under  Contract  No.  DAHC20-67-C-0147  as  part  of  work 
Ur.i  r.  1614B.  The  authors  gratefully  acknowledge  the  assistance 
provided  by  Mr.  George  N.  Sisson,  OCD,  OCD  Project  Officer,  under 
whose  guidance  and  direction  the  project  was  performed. 

Appreciation  is  also  expressed  for  the  assistance  provided 
by  personnel  at  the  National  Civil  Defense  Computer  Facility, 
Olney,  Maryland  where  both  developmental  and  production  work  on 
FIREFLY  was  conducted. 

References  in  the  text  to  Gage-Babcock  refer  to  work  by 
B.  M.  Cohn,  et  al,  Gage-Babcock  and  Associates  in  a  study  en¬ 
titled,  "A  System  for  Local  Assessment  of  the  Conflagration 
Potential  of  Urban  Areas"  (AD  616  623).  Some  work  by  IITRI, 
especially  "Prediction  of  Fire  Damage  to  Installations  and 
Built-Up  Areas  from  Nuclear  Weapons"  (Contract  No.  DA-49-146-XZ- 
021,  IITRI  Proj.  N6001,  July  1965)  and  "Shelter  Fire  Vulnera¬ 
bility — Survey  and  Analysis  of  Representative  Buildings"  (AD  615 
391,  IITRI  Proj.  N6005,  March  1965)  has  proved  extremely  helpful 
in  developing  the  working  model. 


ABSTRACT 


'•  computer  model  called  FIREFLY  has  been  developed  and 
written  in  FORTRAN  IV  for  the  CDC  3600.  This  model  may  be 
applied  to  obtain  statistical  data  on  the  expected  numbers 
of  buildings  destroyed  by  fire  from  the  thermal  pulse  of  a 
hypothetical  nuclear  weapon  and  from  any  subsequent  fire 
spread.  Many  variables  concerning  numbers  and  sizes  of  build¬ 
ings,  their  construction,  and  separation  distances  may  be  evaluated. 
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FIREFLY 
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I.  GENERAL  DESCRIPTION 

The  urban  fire  analysis  model,  FIREFLY,  has  been  developed 
by  System  Sciences,  Inc.,  to  provide  an  automated  method  for 
assessing  the  potential  damage  to  shelter  buildings  from  fires 
which  occur  as  a  result  of  ignition  from  the  thermal  pulse  of 
a  nuclear  weapon  or  fire  spread  from  nearby  buildings.  The 
model  consists  of  three  separate  segments. 

FIREFLY  1  structures  the  problem  for  FIREFLY  2  which  in 
turn  operates  on  the  data  and  provides  the  results.  FIREFLY 
3  accepts  the  output  of  FIREFLY  2  and  provides  statistical 
summaries. 

FIREFLY  1  performs  the  following  functions: 

A.  Reads  building  size  and  construction  data  about  each 
building  as  well  as  the  distance  that  every  building 

,  is  separated  from  its  closest  neighbors. 

B.  Reads  data  concerning  the  wind  speed  and  direction. 

C.  Determines  the  potential  flammability  of  a  particu¬ 
lar  building  as  a  function  of  its  use,  its  contents 
and  its  construction. 
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D.  Determines  the  susceptibility  of  a  particular  build¬ 
ing  to  the  spread  of  fire  from  nearby  structures  as 
a  function  of  the  size  of  these  structures,  their 
separation  and  the  speed  and  direction  of  the  wind 
relative  to  all  neighboring  buildings. 

E.  Writes  a  tape  describing  this  environment  which  be¬ 
comes  the  input  to  FIREFLY  2. 

FIREFLY  2  performs  computing  operations  on  the  given  set 
of  buildings  to  determine  how  many  are  destroyed  for  any  given 
set  of  conditions.  In  accepting  the  probabilistic  values  from 
FIREFLY  1,  it  is  able  to  structure  a  complete  problem  of  ex¬ 
ogenous  and  endogenous  variables,  to  calculate  the  expected 
results  100  times  in  order  to  create  a  valid  statistical  sam¬ 
ple,  and  then  to  change  one  of  the  variables  for  the  calcula¬ 
tion  of  a  new  set  of  results.  The  variables  which  are  changed 
are  a  function  of  moving  the  fireball  closer  to  the  buildings 
to  determine  the  increasing  number  of  structures  which  are  des¬ 
troyed  by  fire  due  to  the  thermal  pulse.  The  number  of  buildings 
destroyed  by  fire  spread  also  becomes  dependent  upon  these  environ¬ 
mental  changes. 

FIREFLY  3,  a  summary  program,  analyzes  each  set  of  the  100 
runs  processed  by  FIREFLY  2  and  provides  the  following  summary 


answers  for  each  of  those  sets: 


i  -t 


\ 

\ 


. .  average  number  and  percent-of-total  buildings  des¬ 
troyed  by  the  thermal  pulse. 

. .  average  number  and  percent-of-total  buildings  des¬ 
troyed  by  fire  spread. 

..  standard  deviations  of  the  above  two  averages. 

The  detailed  descriptions  of  the  three  segments  are  con¬ 
tained  in  the  following  three  sections.  An  overall  flow  chart 
of  the  FIREFLY  system  is  shown  in  Figure  1-1. 

Paragraph  II  following  will  give  some  of  the  rationale, 
background,  and  relationships  presented  in  a  manner  for  the 
analyst  rather  than  a  programmer.  Although  much  of  the  in¬ 
formation  will  be  repeated  and  expanded  in  Sections  2,  3,  4, 

5,  and  6, the  reader  wishing  a  general  knowledge  of  the  model 
may  omit  Sections  2-6. 
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DESCRIPTION  OF  THE  FIREFLY  MODEL 


A.  Rationale  and  Background 

IITRI,  Gage-Babcock,  URS ,  SRI,  and  others  have  done 
a  great  deal  of  developmental  and  applied  work  in 
the  field  of  fire  phenomenology.  Attempts  have  been 
made  at  specifying  the  parameters  which  have  a  bear¬ 
ing  on  the  problem,  defining  some  of  these  parameters 
in  terms  of  workable  expressions,  and  the  construc¬ 
tion  of  fire  models.  No  single  study,  however,  ap¬ 
peared  to  treat  the  problem  in  enough  detail  that 
real  city  blocks  under  hypothetical  attack  condi¬ 
tions  could  be  assessed  rapidly  for  all  possible 
conditions  of  nuclear  threat.  IITRI's  model  was  by 
far  the  most  complete  attempt  at  solving  the  urban 
fire  problem  and  Gage-Babcock  had  gone  furthest  in 
classifying  buildings  and  separation  distances. 

Some  of  both  methods  have  been  employed. 

B.  Sample  Problem 

Since  Sections  2-6  present  much  of  the  more  intricate 
workings  of  the  model  we  shall  begin  with  a  sample 
problem  of  fire  ignition  and  fire  spread  and  work  it 
through  to  completion  much  in  the  same  way  that 
FIREFLY  itself  would. 

The  buildings,  A  and  B,  are  shown  in  Figure  1-2.  They 
are  identical  in  size  and  used  for  the  analysis  to  be 
presented  here. 


Figure  1-2 

Two  Building  Example 


\ 
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The  weather  conditions  prior  to  the  detonation  of 
weapon  show  a  clear  day  (visibility  of  12  miles  or 
greater),  and  a  wind  of  10  mph  blowing  from  the 
northwest. 

The  neighborhood  is  medium-class  residential  with  a 
typical  dwelling  occupancy  of  0.7  persons  per  room. 

A  1  MT  weapon  is  exploded  at  640-foot  scaled  height 
of  burst  creating  an  angle  of  elevation  of  the  fire¬ 
ball  of  20°  at  buildings  A  and  B. 

Of  first  interest  is  to  determine  if  either  build¬ 
ing  will  burn  as  a  result  of  the  thermal  pulse*  by 
calculating  two  distinct  quantities.  The  first  of 
these  quantities,  called  Ptp#  represents  the  pro¬ 
bability  that  a  completely  flammable  building  will 
burn  and  is  given  by 


Ptp  =  1  -  u  -  Pri)N 

We  find  the  value  for  the  probability  of  room  igni¬ 
tion  (Pr^)  from  curves  such  as  Figure  1-3  (which  have 
been  subsequently  reduced  to  algorithmic  form  for  all 
yields,  heights  of  burst,  and  dwelling  occupancies!. 

The  actual  height  of  burst  for  a  1  MT  640-foot  scaled 
is 


*  It  must  be  borne  in  mind  that  FIREFLY  does  not,  at  present, 
take  blast  effects  into  account. 
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PROBABILITY  OF  ROOM  IGNITION 


uotjtuBi  uiooh  jo  £jx-[TqeqoJd 


Slant  Range  (mi 


HOB  =  640  -  640  3/1000  =  6400  ft  =  1.21  miles 

(W  is  in  kilotons ) 

The  slant  range  is  then 


1.21 

sin  20° 


3.54  miles 


Using  Figure  1-3,  pr^  is  found  to  be  0.72  and  repre¬ 
sents  the  probability  that  an  exposed  room  will  sus¬ 
tain  sufficient  ignition  to  produce  flashover. 

The  quantity  N,  the  number  of  ignition  points,  may 
be  defined  as 


N 


,L 


+  w 


)(h) 


pw' 


V 


where 

-  building  length  (ft) 

w  =  building  width  (ft) 

h  =  building  height  (ft) 

a  =  average  area  of  a  single 
window  (3  x  5  ft  normally) 

p  =  ratio  of  window  area  to 
w  total  wall  area  (.20) 

w  =  window  shading  ( found  to 
s  be  .50) 


w^=  window  shielding  factor* 


*  Wh  is  one  minus  the  percentage  shielded.  Thus  if  all  windows  are 
totally  shielded  from  the  thermal  pulse  by  a  neighboring  building, 
then  Wh  =  0. 
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A  note  of  caution  is  necessary  before  N  is  calculated. 

Notice  that  the  value  for  window  area,  a,  is  in  the 

denominator.  From  immediate  inspection  it  appears 

that  if  the  window  size  is  increased,  holding  all 

other  values  constant,  the  number  of  ignition  points 

will  decrease  which  would  not  be  correct.  A  little 

interpretation  of  the  case  in  question  is  necessary. 

Take,  for  example,  the  case  of  a  modern,  all  glass 

front  building.  If  no  interpretation  of  the  values 

is  performed,  one  might  mistakenly  give  "a"  a  value 

equal  to  the  entire  front  area  while  giving  p^  a 

value  of  1.0.  The  value  of  "a"  must  be  examined  from 

the  standpoint  of  the  number  of  compartments  showing 

in  the  front  face  and  using  the  net  average  dimension 

of  the  compartments.  The  value  of  p^  could  never  be 

exactly  1.0 — allowance  must  be  made  for  floor  and  wall 

divisions.  Further,  if  for  the  same  building  the 

value  of  "a"  were  to  double,  then  p  must  also  double. 

w 

The  length  and  width  of  the  building  are  averaged 
since  we  wish  to  express  the  answers  in  terms  of  a 
lateral  random  orientation  of  the  weapon. 

The  only  quantity  remaining  to  be  assessed  is  the 
window  shielding,  w^.  Curves  such  as  Figure  1-4 
must  be  constructed  for  a  typical  urban  area  as  a 
result  of  sightings  from  many  window  levels  (such 
as  may  be  accomplished  using  Sanborn  maps)  to  deter¬ 
mine  the  obstructions  that  will  occur.  Using  Fig¬ 
ure  1-4  for  an  elevation  angle  of  20°  we  find  that 
14%  of  the  windows  will  be  blocked;  thus  w^  is  0.86. 
Solving  for  N,  we  find 


Elevation  Angle  of  Fireba] 
Figure  1-4 


The  second  quantity  to  be  calculated  is  the  proba¬ 
bility  of  interior  spread,  p  ,  and  is  given  by 


Ps  -  sxn 


H(  L  +  F  +  W) 


Before  the  terms  in  the  equation  for  pg  are  evaluated 

it  must  be  mentioned  that  p  itself  is  used  in  two 

s 

places.  Since  it  is  a  measure  of  inter-building 
spread,  reflecting  basically  the  construction  char¬ 
acteristics  from  a  flammability  standpoint,  it  is 
used  to  "degrade"  ptp  and  a  quantity  p^  which  will 
be  evaluated  in  a  later  paragraph. 

The  values  of  H,  L,  F,  W,  and  R  are  factors  which  de¬ 
pend  on  the  height  and  construction  characteristics 
of  the  particular  building.  They  are  explained  in 
detail  in  Section  2  but  must  be  quantified  here  for 

use  in  the  above  expression.  The  following  informa¬ 
tion  is  estimated  using  Sanborn  maps : 


1.  Use  --  apartment  with  a  moderate  fire  load  (L=20) 
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2. 


Exterior  Wall  Construction — masonry,  non-combustible 
(W=10) 

3.  Roof — class  2,  non-combustible  (R=10) 

4.  Floor — fire-resistive  (F=0) 

5.  Height — 2-story  (H=1.0) 

Solving  for  p  ,  we  find 
s 

1.0  (20  +  0  +  10)  +  loj 

40rr  .  tt  .  _.o 

ps  =  sln  300  =  Sln  tTT  =  sln  24 

po  =  0.407 
s 


ps 


sin 


TT 

300 


Now  ps  and  pt^  are  combined  into  the  final  probability 
of  building  ignition,  Ptpn#  hy 


ptpn  ptp  ^s 

ptpn  =  (0.987)(0.407) 

Ptpn  =  0.402 


The  value  of  0.402  is  compared  to  a  random  number  (in 
decimal  form)  which  is  generated  within  FIREFLY.  If 
the  random  number  is  equal  to  or  less  than  the  value 
for  pt  ,  the  building  is  assumed  to  have  been  des¬ 
troyed  by  fire. 
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For  purposes  of  demonstrating  the  fire  spread  por¬ 
tion  of  the  model,  assume  that  building  A  is  burn¬ 
ing  and  building  B  is  not  (i.e.,  the  random  number 
generated  for  B  was  greater  than  0.402).  It  is 
necessary  to  calculate  the  threat  that  A  poses  to 
B  as  a  function  of 


The  nature  of  the  flame  front  that  A  will 
present . 

The  separation  distance  between  A  and  B. 
The  speed  and  direction  of  the  wind. 


1.  The  Flame  Front 

The  first  step  in  assessing  the  nature  of  the 
flame  is  to  decide  upon  a  value  for  the  "aver¬ 
age  flame  height."  This  term  is  a  bit  mislead¬ 
ing  but  only  represents  an  intermediate  calcu¬ 
lation,  and  may  be  assessed  using  the  Table  1-1. 

Remembering  that  building  A  has  a  class  2  roof, 
average  window  openings,  and  is  two  stories  in 
height,  Table  1-1  gives  an  "average  flame  height 
of  14  feet.  This  value  is  divided  into  the  di¬ 
mension  of  building  A  facing  building  B  to  deter 
mine  into  which  of  three  radiating  shapes  the 
building  will  fall  (square,  rectangular,  or  long 
rectangular).  The  desired  ratio  is,  then 


40 

14 


2.86 


A  ratio  of  2.86  c^ssifies  building  A  as  a  rec¬ 
tangular  radiator  (the  criteria  being  between 
1.6  and  8.0). 


*  Reproduced  in  total  from  Table  1  (p.  48)  of  the  Gage-Babcock 

work  referenced  in  the  Foreword. 
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TABLET  1-1 


"Average  Flame  Heights"  For  Building  Characteristics  (in  feet) 


Class  1  Roof  Construction --Fire  Resistive,  2-Hour  or  Better 


Story 

WALL 

Tnnmroi - 

Height 

hone 

Few 

Average 

Many 

All 

1 

•  U 

l.B 

Ja6 

7.2 

12 

2 

.7 

3.6 

7.2 

ia 

2a 

3 

1.1 

5.a 

11 

22 

36 

h 

l.U 

7.2 

ia 

29 

as 

5 

1.8 

9 

18 

36 

60 

6 

2.2 

11 

22 

k3 

72 

7 

2.5 

13 

25 

50 

sa 

8  it  over 

2.9 

Ik 

29 

58 _ 

96 

Class  2  Roof  Construction—  Noncombustible  or  Fire  Resistive  Less  Than  2-Hours 


Story  __ 

WALL 

OP  ENINQS 

Height 

Mone 

Few 

Average 

Many 

All 

'  "t  “ 

10 

11 

IS 

— nr 

Itt 

2 

10 

12 

u 

17 

27 

3 

10 

13 

15 

21 

35 

a 

10 

ia 

17 

2a 

aa 

5 

10 

15 

19 

28 

52 

6 

10 

15 

81 

32 

60 

7 

10 

17 

23 

35 

69 

8  it  over 

10 

17 

2a 

39 

77 

Class  3  Roof  Construction — Wood,  Flat  or  Peaked  Up  to  15  Foot 


Story 

Height 

None 

wall 

Few 

OPENINGS 

Average  Many 

All 

1 

3o 

...  ■5r 

32 

3a 

'  3H 

2 

30 

32 

3k 

37 

a7 

3 

30 

33 

3< 

ai 

55 

a 

30 

3k 

37 

aa 

6a 

5 

30 

3k 

39 

as 

72 

6 

30 

35 

ai 

52 

80 

7 

30 

36 

k3 

55 

89 

8  &  over 

30 

37 

aa 

59 

97 
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Table  1-1  (Continued) 


Class  U  Roof  Construction— Wood,  Bow  String  Truss  or  Peaked  16-25  Feet 


Story 

Wall 

OPENINGS 

Height 

None 

'Fw 

Average 

Many 

All 

1 

15  " 

1i6 

hi 

“19 

53 

2 

1*5 

17 

U9 

52 

62 

3 

U5 

as 

50 

56 

70 

U 

U5 

U9 

52 

59 

79 

5 

US 

Ii9 

5h 

63 

87 

6 

kS 

50 

56 

67 

95 

7 

hS 

51 

58 

70 

10li 

8  &  over 

Ij?  - 

52 

_ 2 _ 

_ 74 

112 

Class  5  Roof  Construction— Wood,  Peaked  26  Feet  and  Over 


Story 

W  A  t  L 

Tpnrrm - 

Height 

None 

Few 

Average 

Many 

All 

1 

So 

61 

62  " 

6li 

60 

2 

60 

62 

61 

67 

77 

3 

60 

$3 

65 

71 

85 

U 

60 

fill 

67 

7U 

91 

5 

60 

61 

69 

78 

102 

6 

60 

65 

71 

82 

110 

7 

60 

67 

73 

85 

119 

8  &  over 

60 

67 

7k 

89 

127 
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Figure  1-5  is  the  curve  of  the  "safe  distance" 
relationship  for  a  rectangular  radiator  as  a 
function  of  the  adjusted  radiating  area.  This 
safe  distance  is  the  distance  away  from  the 
radiating  face  of  a  building  under  quiescent 
wind  conditions  at  which  ignitions  will  not 
occur.  The  adjusted  radiating  area  is  the  aver¬ 
age  flame  height  (14  feet)  multiplied  by  the 
width  of  the  face  (40  feet),  or  560  sq  ft.  Fig¬ 
ure  1-5  shows  the  safe  distance  to  be  68  feet. 

2.  The  Separation  Distance 

The  actual  distance  of  separation  is  compared 
to  the  theoretical  safe  separation  distance. 

If  the  actual  distance  is  zero,  the  probability 
of  "jump",  pj,  (i.e.,  the  probability  that  the 
heat  from  building  A  will  be  sufficient  to 
cause  one  or  more  ignitions  in  building  B)  is 
set  equal  to  1.0  for  combustible  separating 
walls  and  0.95  for  fire-resistive  walls.  If 
the  actual  distance  is  greater  than  the  safe 
distance,  pj  is  zero.  For  cases  in  between  a 
quantity  x  is  calculated  as 


actual  distance 
safe  distance 


x 


40 

68 


0.588 


3.  The  Wind 

The  direction  of  the  wind  is  shown  in  Figure  1-2 
the  speed  is  10  mph.  Building  B  is  located  due 
south  from  A,  thus  the  wind  component  for  spread 
considerations  from  A  to  B  is 


J  cos  9 
o 

10  cos  45° 
+  7.07  mph 


_1 
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Safe  Separation  Distance  (feet) 


FIREFLY  vectors  all  winds  for  spread  considera¬ 
tions  to  create  any  one  of  nine  cases — fire 
spread  with,  perpendicular  to,  or  into  a  low  (<S 
mph),  medium  (^8  bqt  <16  mph),  or  high  wind  (£.  16 
mph).  The  rationale  for  this  may  be  demonstrated 
in  Figure  1-6. 


1 


Circle  1  represents  the  safe  distance  from  a 
radiating  point  source  located  at  0  under 
quiescent  conditions.  If  a  wind  is  blowir.q  as 
indicated  the  figure  changes  as  shown  by  curve 
2.  Spread  from  0  to  A  will  be  difficult  since 
both  fire  brands  and  the  flame  inclination  will 
be  "pointed"  towards  C  rather  than  towards  A. 
Spread  perpendicular  to  the  wind  (0  to  B) 
will  be  greater  than  that  from  0  to  A  but  still 
less  than  the  original  value  of  the  radius  of 
circle  1.  As  the  wind  speed  increases^  OA  and 
OB  decrease  whereas  OC  increases.  It  may  be 
thought  then  any  curve  will  inscribe  an  identical 
area. 

Within  FIREFLY,  the  nine  curves,  which  each  plot 
actual/safe  distance  ratio  *  versus  pj,  fire 
jump  probability,  are  contained  in  mathematical 
form.  The  expression  relating  a  value  of  x 
equal  to  0.588  for  spread  with  (building  A  to  B) 
a  low  (7.07  mph)  wind  for  x  between  .45  and  .71 
is 


Pj  =  ,96x  -  .340 
Pj  =  0.224 


32 


The  value  for  pj  is  compared  to  a  random  number 
as  before.  If  that  random  number  is  less  than 
or  equal  to  pj,  we  have  sufficient  energy  pre¬ 
sent  at  building  B  to  cause  ignition.  To  deter¬ 
mine  whether  or  not  B  burns,  a  final  random  num¬ 
ber  is  compared  to  ps  (inter-building  spread 
probability)  for  building  B.  If  B  is  found  to 
be  burning,  it  then  becomes  a  candidate  for 
causing  spread  to  other  nearby  structures. 
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III. 


OUTPUT 


Under  normal  operating  conditions,  FIREFLY  does  not  cal¬ 
culate  either  pr^  or  the  angle  of  fireball  elevation  but,  in¬ 
stead,  "pegs"  enough  values  to  create  a  spectrum  of  answers. 
Using  one  wind  vector,  p^^  takes  on  values  of  .1,  .3,  .5,  .7, 
and  .9  for  each  of  the  angles  of  5°,  10°,  and  30°.  Since 
FIREFLY  must  create  a  statistical  sample,  each  of  the  15  cases 
of  pr^  and  angle  must  be  run  100  times. 

At  any  one  case,  an  infinite  host  of  conditions  are  simul¬ 
taneously  represented.  A  pri  of  .5  and  an  angle  of  5°,  for 
example,  may  represent  a  small-yield,  ground  burst  weapon  at 
short  range  on  a  clear  day,  a  large-yield,  air  burst  weapon 
far  away  on  a  hazy  day,  and  so  forth. 

Tables  1-2,  1-3,  and  1-4  represent  actual  FIREFLY  output 
from  three  separate  runs  (one  for  each  wind  speed  level)  against 
an  actual  area  in  East  Boston,  Massachusetts.  The  data  rnay  be 
presented  in  many  ways 

...  in  tabular  form  as  shown 

...  on  curves  on  linear  paper 

...  on  special  paper  (log-log,  linear-probability) 


•H 
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FIREFLY  RESULTS 
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Figures  1-7  through  1-9 


\ 


using  different  labels  for  the  axes, 
show  typical  representations  of  the  output  for  the  run  made 
against  ljtoston. 
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Probability  of  Room  Ignition 


I. 


INTRODUCTION 


The  first  task  of  FIREFLY  1  is  to  read  a  large  amount  of 
information  about  each  building  (its  size,  general  construc¬ 
tion  type,  and  separation  distance  from  all  nearby  structures) 
and  a  wind  vector  (given  in  terms  of  a  wind  speed  and  an 
azimuth) .  The  model  must  be  structured  in  terms  of  the  four 
cardinal  directions  as  all  distances,  and  ultimately  all  wind 
vectors,  are  related  to  each  other  in  terms  of  north,  east, 
south,  and  west.  The  capacity  of  the  computer's  data  handling 
capability  limits  an  area  assessment  to  27  city  blocks,  each 
block  containing  no  more  than  10  buildings  per  side  (for  a 
maximum  of  40  buildings  per  block  and  1080  buildings  per 
assessment) . 

Each  building  is  given  a  three-digit  code  of  the  form 
(i,j,k)  where  "i"  is  the  block  number,  "j"  is  the  cardinal 
direction  (1-north,  2-east,  3-south,  and  4-west)  of  the  build¬ 
ing's  location  on  the  block,  and  "k"  is  the  building  number 
within  a  particular  block;  "i"  and  "k"  must  be  sequentially 
numbered  from  one.  Figure  2-1  ia  a  typical  representation 
of  a  city  block  and  a  number  scheme.  It  may  be  noted  that 
the  block  between  Pine  Street  and  Maple  Street  has  been  made 
into  two  blocks.  This  was  done  because  of  the  limitation  of 
10  buildings  per  block  side.  The  long  building  on  the 
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ocks ide 


*  (1,3,2)  uniquely  defines  the  building.  The  block  number  is 

1,  the  biockside  number  is  3  (south),  and  the  lot  number  is 

2. 

NOTE:  There  are  more  than  ten  buildings  on  biockside  3  of 

the  physical  block  made  up  of  BL0CK2  and  BL0CK3  so  the  phys¬ 
ical  block  must  be  split  to  keep  within  the  program's  limita¬ 
tions.  The  building  on  biockside  1  of  BL0CK2  and  3  is  split 
by  this  division;  however,  the  part  of  this  building  in 
BL0CK3  has  more  than  4  neighboring  buildings  to  the  south. 

Thus  the  building  is  again  split. 

KEY 

======  changes  from  physical  building 

to  those  within  the  limitations 
of  the  program 

-  changes  from  physical  blocks  to 

those  within  program's  limita¬ 
tions 
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southside  of  Elm  Street  has  been  split  into  three  separate 
buildings  because  of  a  limitation  of  four  neighboring  bui Ld- 
ings  in  any  one  direction. 

The  input  data  is  described  in  sub-section  2.  Once  this 
data  has  been  read  by  the  program,  the  first  task  is  to  com¬ 
pute  the  probability  that  any  particular  building  will  ignite 
as  a  function  of  its  own  construction,  the  distance  to  nearby 
structures  that  may  be  burning,  and  the  prevailing  wind. 
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II. 


BUILDING  CONSTRUCTION 


A.  Ignition  from  Fire  Spread 

The  assessment  of  the  vulnerability  of  a  building  to 
fire  was  taken  in  part  from  a  study  by  Gage-Babcock 
and  Associates  ("A  System  for  Local  Assessment  of  the 
Conflagration  Potential  of  Urban  Areas,"  March  1965). 
They  recorded  quantitative  values  to  be  assigned  to  a 
city  block;  these  values,  based  primarily  upon  number 
of  wall  openings,  roof,  floor,  and  exterior  wall  con¬ 
struction,  building  size,  and  susceptibility  of  a 
particular  block.  FIREFLY  uses  these  quantities  to 
calculate  an  index  (from  0-100)  for  each  building. 

This  index,  called  PRF.  •  v  becomes  the  probability 
of  ignition  from  fire  spread  when  divided  by  100.  A 
completely  wood-frame  residential  structure  develops 
a  rating  near  1.0;  a  modern  fireproof  office  building, 
on  the  other  hand,  has  a  very  low  rating. 

The  size  of  the  four  building  walls  is  also  calculated. 
This  is  done  so  that  if  this  building  is  found  to  be 
burning  at  a  later  time,  the  maximum  size  of  the  flame 
front  may  be  calculated  to  assess  the  threat  to  nearby 
buildings;  a  large  building  which  is  burning  obviously 
presents  a  greater  threat  to  a  neighboring  structure 
than  a  small  building. 

B.  Ignition  from  Thermal  Pulse 

The  mathematical  treatment  of  the  phenomena  of  thermal 
pulse  generation  and  transmission  has  been  thoroughly 
covered  in  other  documents  and  will  not  be  discussed 
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here.  Actually,  FIREFLY  does  not  treat,  basic  weapon 
parameters  at  all  but  is  concerned  with  assessing  the 
change  in  the  probability  of  building  ignition  from 
thermal  pulse  as  a  function  of  only  two  exogenous 
variables:  the  probability  of  ignition  of  an  exposed 
"room"  and  the  angle  of  elevation  of  the  weapon  fire¬ 
ball. 

Three  elevation  angles  (5°,  10°,  30°  )  are  examined 
each  with  five  probabilities  (.1,  .3,  .5,  .7,  .9), 
thus  FIREFLY  1  runs  15  times.  The  reason  for  the 
limits  of  the  angles  of  elevation  is  that  much  be¬ 
low  5°  represents  little  thermal  pulse  threat  and 
at  angles  over  30°  the  fire  problem  is  insignifi¬ 
cant  since  blast  is  the  major  agent  of  damage  at  this 
point.  By  selecting  discrete  exposed  room  proba¬ 
bilities,  a  world  of  conditions  may  be  represented 
independent  of  yield,  atmospheric  transmissivity, 
and  distance  to  burst.  Thus  with  the  angle  of  ele¬ 
vation  fixed  at,  say,  10°,  a  probability  of  0.3  may 
represent  a  1MT  weapon,  8  miles  away,  with  visibility 
of  6  miles,  a  200KT  weapon,  10  miles  away  on  a  clear 
day — clearly  the  combinations  are  infinite. 

The  general  expression  that  is  solved  is  of  the  form 


Pb  =  (1  -(1  -Pr)N) 


where 

Pb  =  Pr°bability  of  building 
ignition 

P  =  probability  of  "room" 

!  ignition 

N  =  number  of  exposed  "rooms 
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A  "room"  is  now  defined  as  any  environment  behind  a 
window  and  an  exposed  room  is  any  environment  which 
will  be  "seen"  by  the  fireball.  The  number  of  ex¬ 
posed  rooms,  N,  is  calculated  as  a  function  of 

...  the  fact  that  only  one  building  side  can 
effectively  face  the  blast 

...  the  number  of  windows  that  may  be  shielded 
by  neighboring  buildings  given  the  angle 
of  elevation  of  the  fireball 

...  the  physical  size  of  the  building 

...  the  percent  window  openings  to  total  wall 
area 

...  the  physical  size  of  the  windows 

...  the  average  expected  number  of  windows 
which  will  be  covered  by  drapes ,  shades, 
and  blinds 

Many  of  the  above  items  have  been  standardized  within 
the  program  but  they  may  be  varied. 

The  probability  of  building  ignition,  has  to  be 
further  modified,  however,  since  the  expression 
1  -(1  -P  )  takes  no  account  of  different  building 
construction.  A  series  of  ignitions  in  a  wooden 
building  is  potentially  more  disasterous  than  ig¬ 
nitions  in  a  modern  reinforccd-concrete  building. 

The  value  of  P.  is  multiplied  by  PRF .  .  .  which 

D  1  #  j  9  K 

was  calculated  previously  to  reflect  building  con¬ 
struction  and  contents. 
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III.  SEPARATION  DISTANCES 


All  pertinent  separation  distances  are  read  and  become 
permanent  data  within  the  program.  Referencing  Figure  2-1 
again,  building  (1,3,2)  has  three  associated  physical  sep¬ 


arations. 


V* 
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IV.  WIND 


For  purposes  of  analysis  any  wind  speed  (in  miles  per 
hour)  and  any  azimuth  (measured  in  degrees  counter  clock¬ 
wise  from  due  East)  may  be  chosen.  For  assessment,  the  wind 
will  be  classified  within  the  program  as  low  (<  8  mph),  med¬ 
ium  (  *  8  but  <  16  mph)  or  high  (*  16  mph)  and  fire  spread 
potential  will  be  assessed  in  the  four  cardinal  directions  to 
correspond  with  the  normal  methods  of  calculation  within  the 
program.  Once  the  wind  vector  has  been  split  into  its  two 
cardinal  orthogonal  components,  counter,  mirror  images  are 
formed  along  the  two  remaining  cardinal  directions.  For  in¬ 
stance,  if  a  wind  were  blowing  from  the  southwest  (i.e.,  in¬ 
to  or  towards  the  northeast)  there  would  exist  a  vertical  com¬ 
ponent  due  north  and  a  horizontal  component  due  east.  If  fire 
spread  is  being  considered  from  one  building  to  another,  more 
easterly,  building,  then  the  fire  spread  will  be  aided  (i.e., 
the  probability  of  spread  will  be  higher).  If  the  reverse 
were  true,  a  westerly  spread,  the  probability  of  spread  will 
be  correspondingly  lowered. 

Thus  nine  combinations  exist i  fire  spread  with,  into,  or 
perpendicular  to  a  low,  medium,  or  high  speed  wind.  These  com¬ 
binations  are  used  in  determining  the  probability  that  fire 
will  "jump"  a  gap. 
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PROBABILITY  OF  FIRE  JUMP 


Fire  jump  from  one  structure  depends  upon  how  large  the 
burning  building  is,  how  far  away  it  is,  and  what  the  wind 
conditions  are,  A  distance  from  a  given  building  is  calcu¬ 
lated  which  is  the  "safe  distance"— i.e. ,  that  distance  at 
which  under  quiescent  wind  conditions  no  ignitions  will  occur 
as  a  result  of  radiant  flux.  Then  from  any  one  building  under 
question  the  actual  distance  to  any  neighboring  building  is 
examined  and  a  quantity,  X,  is  calculated  where 


x  =  actual  separation  distance 
"safe  distance11 


When  X  is  equal  to  or  greater  than  unity,  the  probability 
of  fire  jump  is  zero;  if  X  is  zero,  the  probability  of  fire 
junq?  is  1.0.  It  is  when  X  is  between  zero  and  one  that  any  of 
nine  equations  are  selected  which  calculate  the  probability  of 
fire  junp  as  a  function  of  X  and  the  applicable  wind  vector. 
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VI.  SUMMARY  OF  OUTPUT  DATA 

In  the  output  tape  which  FIREFLY  1  creates  for  FIREFLY  2 
three  basic  quantities  are  of  interest.  It  is  these  quantities 
which  FIREFLY  2  will  use  in  its  Monte  Carlo  routine  to  assess 
expected  fire  damage  under  various  conditions.  For  each  build¬ 
ing,  FIREFLY  1  contains: 

A.  The  probability  of  building  ignition  from  the  thermal 
pulse  of  a  nuclear  weapon 

B.  The  probability  of  building  ignition  from  fire  spread 

C.  The  probability(ies)  that  the  building  will  receive 
sufficient  radiant  flux  from  any  and  all  neighboring 
structures  that  have  themselves  been  ignited. 

Items  B  and  C  above  are  finally  combined  in  Bayesian 
fashion  since  B  has  relevance  only  if  C  is  met. 
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VII 


DATA  DESCRIPTION 


The  data  needed  to  operate  FIREFLY  1  consists  of  six 
card  types.  All  values  are  right  justified. 


A.  Card  Type  1 — Building  Card  (1  card) 

Cola.  ttggSrjjBtisn 

2-5  The  total  number  of  buildings,  N 

B.  Card  Type  2—  Block  Card  (1  card) 

Cols.  fifiscrjj3ti9.il 

2-5  The  total  number  of  blocks,  M 

C.  Card  Type  3 — Wind  Information  (1  card) 

Cola.  Pfifisriation 

1-5  Number  of  miles  per  hour  of  wind 

7-10  Angle  of  the  wind  in  radians  from  east 
counterclockwise 

D.  Card  Type  4— Block  Information  (1  card/Oolock) 

Cards  should  be  ordered  in  ascending  block  number 

cols.  fi£g9jripU9q 

7-8  The  number  of  buildings  on  the  north  block- 

side  of  the  block  in  question 
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Cols.  Description 

10-11  The  number  of  buildings  on  the  east  block- 

side 

13-14  The  number  of  buildings  on  the  south 

16-17  The  number  of  buildings  on  the  west 


Card  Type  5 — Building  Information  Card  #1  (1  card/ 
building) 


Cards  should  be  ordered  in  ascending  order  number. 
Every  card  type  5  must  be  followed  by  a  card  type 
6. 


Cols.  agisrjptjgn 

1-2  The  block  number  of  the  building  A.  There 

are  the  fol’ owing  limitations:  there  should 
be  a  maximum  of  twenty-seven  blocks  of  four 
blocksides  each.  Each  blockside  may  have  a 
maximum  of  ten  buildings.  The  blocks  must 
be  sequentially  numbered  from  one. 

4  The  blockside  number  of  building  A.  The 

maximum  possible  number  is  four.  With  each 
block  all  the  blocksides  need  not  contain  a 
building  or  buildings.  Blockside  1  means 
the  northern  part  of  the  block,  while  block- 
side  2,  3,  or  4  means  the  eastern,  southern, 
or  western  part  respectively. 

6-7  The  lot  number  of  A.  Each  blockside  which 

contains  a  building  or  buildings  must  have 
the  lots  numbered  from  one  and  incremented 
by  one  to  a  maximum  of  ten.  Building  in¬ 
formation  is  to  be  arranged  in  ascending 
order  according  to  the  order  number. 

11-13  The  width  in  feet  in  the  east  and  west  di¬ 
rection  of  building  A. 

15-17  The  width  in  feet  in  the  north  and  south 
direction  of  building  A. 
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Cols .  Description 

18-19  The  number  of  stories. 

21-23  The  number  of  feet  building  A  is  setback 

from  the  street.  The  setback  is  only  re¬ 
corded  for  the  side  of  the  building  con¬ 
sidered  the  front  side. 

25  The  value  assigned  for  the  relative  number 

of  wall  openings  which  determines  combusti¬ 

bility.  If  there  are  no,  few,  average,  many, 
or  all  openings,  the  value  is  one,  two,  three 
four,  or  five  respectively. 

27  The  value  assigned  building  A  for  the  roof 

construction  which  determines  its  combusti¬ 
bility.  A  table  of  values  is  presented  be¬ 
low;  this  and  subsequent  tables  have  been 
taken  from  previously-referenced  work  by 
Gage-Babcock  and  Associates. 


ROOF  CONSTRUCTION 


_ Category _ Value 

Protected  Noncombustible  0 
Unprotected  Noncombustible  1 
Noncombustible  on  Combustible  Supports  2 
Combustible  3 


Examples 


Protected  Noncombustible:  reinforced  concrete,  precast  concrete, 
steel  construction  protected  by  metal  lath  and  plaster,  or 
by  "fire-rated"  acoustical  ceilings. 

Unprotected  Noncombustible:  any  concrete  or  gypsum  roof  on  ex¬ 
posed  steel  supports  (without  metal  lath  and  plaster  of 
"fire-rated"  acoustical  ceiling),  metal  deck 
or  metal  on  concrete  supports,  fire-retardant  treated  lumber 

Noncombustible  on  Combustible  Supports:  metal  or  cement-asbestos 
panels  on  wood  supports  (without  wood  decking  or  combustible 
insulation  on  the  inside). 
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Combustible ;  ordinary  wood  joist  construction,  mill  construc¬ 
tion,  wood  deck  on  metal  or  concrete  supports,  plastic 
panels  on  wood  or  metal  supports. 


Cols . 
40 

42-44 

46-48 

50-52 

54-56 

58 

60-62 

64-66 

68-70 

72-74 

76 

80 


Description 

The  number  of  neighboring  buildings  to  the 
north  of  building  A.  The  maximum  number  is 
four. 

The  distance  in  feet  between  the  first  build 
ing  to  the  north  of  A  and  building  A. 

The  distance  between  the  second  building  to 
the  north  of  A  and  building  A. 

The  distance  in  feet  between  the  third  build 
ing  to  the  north  of  A  and  building  A. 

The  distance  between  the  fourth  building  to 
the  north  of  A  and  building  A. 

The  number  of  neighboring  buildings  to  the 
east  of  building  A. 

The  distance  between  the  first  building  to 
the  east  of  A  and  building  A. 

The  distance  between  the  second  building  to 
the  east  of  A  and  building  A. 

The  distance  between  the  third  building  to 
the  east  of  A  and  building  A. 

The  distance  between  the  fourth  building  to 
the  east  of  A  and  building  A. 

The  number  of  neighboring  buildings  to  the 
south  of  building  A. 

The  number  "l"  designating  building  infor¬ 
mation  Card  #  1. 


F.  Card  Type  6~Building  Information  Card  #  2  (1  card/ 
building) 


Cols .  Description 

1-2  The  block  number  of  building  A. 
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Cols .  Description 

4  The  blockside  number  of  building  A. 

6-7  The  lot  number  of  building  A. 

9-11  The  distance  between  the  first  building  to 
the  south  of  A  and  building  A. 

13-15  The  distance  between  the  second  building  to 
the  south  of  A  and  building  A. 

17-19  The  distance  in  feet  between  the  third  build¬ 
ing  to  the  south  of  A  and  building  A. 

21-23  The  distance  between  the  fourth  building  to 

the  south  of  A  and  building  A. 

25  The  number  of  neighboring  buildings  to  the 
west  of  building  A. 

27-29  The  distance  between  the  first  building  to 
the  west  of  A  and  building  A. 

31-33  The  distance  between  the  second  building  to 
the  west  of  A  and  building  A. 

35-37  The  distance  between  the  third  building  to 
the  west  of  A  and  building  A. 

39-41  The  distance  between  the  fourth  building  to 
the  west  of  A  and  building  A. 

44-45  The  value  assigned  to  building  A  for  the  fire 
load  of  the  building  which  determines  its 
combustibility.  (See  below) 


OCCUPANCY  FIRE  LOADING 


Category _ Value 


Negligible  0 
Light  10 
Moderate  20 
High  30 
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Examples 


Negligible :  vacant  or  essentially  noncombustible  contents,  occu 

pancy  fire  loading  not  exceeding  5  lbs.  per  sq.  ft. 


Machine  shops  &  metalworking 
with  negligible  combustibles 
Stge.  of  metal  implements  or 
machinery,  not  packed  or 
crated 


Boiler  houses,  power  houses 
Brick  storage,  stone  crush¬ 
ing,  etc. 

Water  treatment  &  sewage  dis¬ 
posal  plants 


Light?  occupancy  fire  loading  ranging  from  approximately  6  to 
15  lbs.  per  sq.  ft. 


Houses  and  apartments 
Hotels,  hospitals 
Sdhools,  laboratories 
Halls,  gymnasiums 
Offices,  court  houses, 
jails,  banks 

Police  and  fire  stations 


Moderate :  occupancy  fire  loading 
to  25  lbs.  per  sq.  ft. 

Amusement  parks,  bowling 
alleys,  theaters 
Automobile  service  stations, 
repair  &  parking  garages 
Churches 

Laundry  &  dry  cleaning  shops 
Restaurants 


Telephone  exchanges 
Libraries  (metal  shelving1) 
Funeral  parlors 
Coal  storage 
Bulk  grain,  salt  storage 
Bulk  fertilizer  storage 


ranging  from  approximately  16 


Department  and  variety  stores 
premises  not  crowded 
Retail  stores  and  shops,  general 
Cold  storage  warehouses 
Drug  stores 

Mbst  manufacturing  plants  (not 
involving  large  amounts  of 
combustibles  or  flammables) 
Storage  of  grain,  fertilizer, 
etc.  in  sacks 


High;  occupancy  fire  loading  exceeding  25  lbs.  per  sq.  ft. 


Aircraft  hangars 
Petroleum  refineries 
Paint  Factories 
Flammable  liquids  processing 
Whiskey  warehouses 


Department  and  variety  stores 
premises  crowded 
Warehouses,  general 
Truck  terminals 
Plastics  manufacturing 
Cotton  stocks 


Asphalt  mixing  plants 
Rubber  tire  storage 
Stock  yards 
Junk  yards 


Textiles,  ciothiny,  mattress 
manufacturing  or  storage 
Woodworking  and  lumber  yards 
Feed  mills 


Cols .  Description 

47-48  The  value  assigned  to  building  A  for  exterior 
wall  construction.  (See  below) 


EXTERIOR  WALL  CONSTRUCTION 


Category  Value 

Standard  0 
Substandard  Masonry  10 
Noncombustible  10 
Noncombustible  on  Combustible  Supports  15 
Combustible  30 


Examples 


Standard  Masonry;  not  less  than  li  in.  brick  walls  or  equivalent 
in  sound  condition,  with  not  more  than  an  average  number  of 
openings.  Equally  acceptable  are  8  in.  brick  walls  on  dwell¬ 
ings,  8  in.  concrete  block  with  4  in.  brick  facing,  12  in. 
concrete  block,  12  in.  stone,  10  in.  unreinforced  concrete 
or  6  in.  reinforced  concrete. 

Substandard  Masonry:  masonry  walls  of  lesser  thicknesses  than 
above  or  in  poor  condition,  or  with  more  than  an  average 
number  of  openings. 

Noncombus t ibl e :  glass  store  fronts  on  brick  buildings,  glass 
or  metal  curtain  walls  on  concrete  or  steel  supports, 
metal  sheathing  over  metal  supports,  etc. 

Noncombustible  on  Combustible  Supports  ;  glass  or  skeleton  metal 
walls  on  wood  supports,  corrugated  metal  or  cement-asbestos 
panels  on  wood  supports,  brick  or  stone  veneer,  etc. 
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Combustible :  ordinary  wood  frame  construction,  wood  store  fronts 

or  bay  windows  in  brick  buildings,  enclosed  or  open  wood 
porches,  wood  composition,  asbestos,  or  metal  sheathing  over 
wood  siding,  exterior  wood  paneling  regardless  of  supports, 
plastic  siding  etc. 


Cols .  Description 

50-51  The  value  assigned  to  building  A  for  floor 
construction  (See  below). 


FLOOR  CONSTRUCTION  (Exclude  Basement) 


Category 

Fire  Resistive  or  Noncombustible 

One  or  more  floors,  all  or  partially 
combustible 


Examples 


Value 


Fire  Resistive  or  Noncombustible:  reinforced  concrete,  steel 
deck  with  or  without  concrete  topping,  concrete  or  other 
cement ious  topping  on  formboard,  etc. — all  of  the  above 
supported  on  concrete  or  steel  beams,  girders,  trusses, 
columns,  etc.  Wood  flooring  over  concrete  or  carpeting 
should  not  affect  the  classification. 

Combustible :  ordinary  wood  joists  with  or  without  ceilings, 
mill,  and  semi-mill  construction,  wood  flooring  on  steel 
beams  or  joists,  etc. 


Cols . 


53-55 


57-59 


Description 


The  value  assigned  to  building  A  depending 
upon  the  angle  of  inclination  of  the  terrain, 
(See  the  following  page) 
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TERRAIN  MULTIPLIER 


Slope  Multiplier 


10%  or  less 
11%  to  20% 
21%  to  40% 
41%  to  60% 
61%  to  80% 
over  80% 


1.0 

1.1 

1.3 

1.6 

1.8 

2.0 


Cols. 

. . 

61-65 


Description 

The  multiplier  for  building  characteristics 
given  in  Table  1-1. 

"2"  for  building  card  #  2 
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VIII.  DESCRIPTION  OF  PROCESSING  SEQUENCE 


STATEMENT  NUMBER 
From  Through 

The  number  of  buildings  to  have  lot  informa¬ 
tion  read  in  is  input. 

(0+3) 

(0+3) 

The  number  of  blocks  to  have  lot  information 
read  in  is  input. 

(0+4) 

(0+4) 

Wind  information  card  is  input. 

(5+1) 

(5+2) 

KSEQ1  contains  the  sequence  number  for  the  pre¬ 
vious  record  read  in.  Here  it  is  initially 
set  equal  to  zero. 

(1+1) 

(1+1) 

KPAGNTN ,  storing  the  total  number  of  lines  of 
output  on  the  page,  is  set  to  one. 

(1+2) 

(1+2) 

The  do  loop  is  used  to  read  in  the  number  of 
buildings  per  blockside  for  each  block, 
i.e.  KCOUNT  (I,J). 

(1+3) 

(21) 

Type  1  of  building  information  is  read.  There 
is  a  check  to  see  if  there  is  a  "1"  re¬ 
corded  in  column  80. 

(22+2) 

(10+1) 

The  block,  blockside,  and  lot  number  are  stored 
in  NBLK,  NDIR,  and  NLOT,  respectively  so 
that  these  three  can  be  compared  to  the 
block,  blockside,  and  lot  number  of  Type  2. 

(10+2) 

(10+4) 

Type  2  of  building  information  is  input. 

(10+5) 

(10+5) 

If  the  density  of  all  the  buildings  is  100, 
"KD=100"  should  appear  here.  If  the 
density  is  not  necessarily  100,  remove 
this  card. 

(23+1) 

(23+1) 

WB1  is  set  equal  to  KWIDTH.  WB2  is  set  equal 

(23+4) 

(23+6) 

to  KWIDTH2.  STY  has  the  same  value  as 
KSTY.  Thus,  three  floating  point  vari¬ 
ables  are  set  equal  to  integer  variables . 
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STATEMENT  NUMBER 
From _ Through 


There  is  a  check  to  see  if  column  80  contains  (23+7)  (23+9) 

a  "2".  The  block,  blockside,  and  lot  num¬ 
bers  of  Type  2  are  tested  to  see  if  they 
are  the  same  as  Type  l's.  If  there  is  a 
difference,  there  is  a  jump  to  statement 
(14)  which  is  an  error  printout. 


These  two  do  loops  vary  the  angle  of  elevation  (23+10)  (24) 

and  the  probability  of  ignition  of  an  ex¬ 
posed  room.  The  probability  of  ignition 
of  an  exposed  room  is  modified  by  its  en¬ 
vironment.  The  probability  of  building 
ignition  is  computed. 


If  this  is  not  the  first  time  through  this  part  (24+1)  (3715+2) 

for  the  building  under  consideration,  the 
probability  of  building  ignition  is  com¬ 
puted  and  the  angle  of  fireball  elevation, 
the  exposed  room  ignition  probability,  and 
the  probability  of  building  ignition  from 
thermal  pulse  are  written.  If  this  is  the 
first  time  through  this  part  for  the  build¬ 
ing  under  consideration,  there  is  a  jump  to 
the  end  of  the  do  loop. 


There  is  a  test  to  see  if  the  cards  are  in 
ascending  order.  If  there  is  an  error, 
there  is  a  statement  written  out  which 
indicates  a  sequence  error,  and  then 
there  is  a  jump  to  the  end  of  the  program. 

(3718) 

(25) 

The  block  and  blockside  number  are  stored  in 
"I"  and  "J"  respectively  for  convenience 
in  referencing. 

(13) 

(13+1) 

If  the  first  neighboring  building  is  being  con¬ 
sidered,  the  wind  vector  is  broken  down 
into  its  north,  east,  south,  and  west  com¬ 
ponents  in  miles  per  hour. 

(28) 

(46+3) 

The  number  of  miles  per  hour  and  the  angle  of 
the  wind  are  written  out  as  well  as  the 

(15+1) 

(17+1) 

north,  east,  south,  and  west  components. 
KPAGNTN  is  updated. 
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The  contribution  factor,  FC,  is  computed  using 
the  setback  distance.  The  contribution 
factor  is  used  to  adjust  the  radiating 
area  when  the  street  width  is  used  rather 
than  the  distance  between  the  buildings . 

The  four  radiating  areas  are  computed. 

Two  factors,  KH  and  KRR,  needed  to  determine 
the  Gage-Babcock  index  are  determined  by 
considering  the  number  of  stories,  KSTY, 
and  the  roof  combustibility  value,  KCR. 

The  Gage-Babcock  Index,  BIN,  is  determined  in 
these  statements.  If  BIN  is  greater 
than  150,  it  is  set  to  150. 

The  probability  the  building  with  lot  number 
K  on  blockside  J  of  block  I  will  catch 
fire  is  determined  here. 

The  radiating  areas,  WMF  (L)  where  L=l,  2,  3, 
or  4  are  set  equal  to  ARBLDG1,  ARBLDG2, 
ARBLDG3 ,  or  ARBLDG4  respectively. 

The  flame  heights  for  the  north-HFl,  east  HF2, 
south-HF3,  and  west-HF4  direction,  are 
determined  in  these  statements. 

The  shapes  of  the  radiators  in  the  north-Sl, 
east-S2,  south-S3,  and  west-S4  are  de¬ 
termined  in  these  statements. 


STATEMENT  NUMBER 


Through 


(3719)  (150) 


(160)  (160+4) 

(160+5)  (310) 

(320)  (340) 

(350)  (350) 

(350+1)  (350+4) 

(3602)  (3602+3) 

(3602+4)  (3618) 


In  these  statements  it  is  determined  which  of  (369)  (1820) 

the  four  components  of  the  wind  vector, 

DMPHRN,  DMPHRE,  DMPHRS,  or  DMPHRW,  has 
the  largest  positive  number  of  miles  per 
hour  of  wind  and  which  has  the  next  larg¬ 
est  number  of  miles  per  hour  of  wind. 
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STATEMENT  NUMBER 
From _ Through 


If  the  wind  vector  in  the  west  direction  is 

largest,  and  the  one  in  the  north  is  next, 
these  statements  are  not  skipped.  The 
north,  east,  south,  and  west  components 
of  the  wind  vector  are  classified  as  low, 
medium,  or  high  wind.  KVD*=l  indicates  a 
low  wind  in  the  direction  D*.  The  des¬ 
criptive  numbers  of  north,  east,  south, 
and  west  are  "1",  "2",  "3“,  and  "4"  re¬ 
spectively.  A  "4"  is  stored  in  MAJDIR. 


(1760)  (1760+9) 


If  the  wind  vector  in  the  west  direction  is 

the  greatest,  and  the  one  in  the  south  is 
next,  these  statements  are  not  skipped. 

The  north,  east,  south,  and  west  compon¬ 
ents  of  the  wind  vector  are  classified  as 
low,  medium,  or  high  wind.  A  "4"  is  stored 
in  MAJDIR. 

If  the  wind  vector  in  the  south  direction  is 
the  greatest,  and  the  one  in  the  west  is 
next,  these  statements  are  not  skipped. 

The  north,  east,  south,  and  west  compon¬ 
ents  of  the  wind  vector  are  classified  as 
low,  medium,  or  high  wind.  A  "3”  is 
stored  in  MAJDIR. 

If  the  component  of  the  wind  vector  in  the 

north  direction  is  the  greatest,  and  the 
one  in  the  east  is  next,  these  statements 
are  not  skipped.  The  north,  east,  south, 
and  west  components  are  classified  as  low, 
medium,  or  high  winds.  A  "1"  is  stored  in 
MAJDIR  to  indicate  that  the  northern  wind 
component  is  largest. 

If  the  component  of  the  wind  vector  in  the  east 
direction  is  the  greatest,  and  the  one  in 
the  north  direction  is  next,  these  state¬ 
ments  are  not  skipped.  The  north,  east, 
south,  and  west  components  are  classified 
as  low,  medium,  or  high  winds.  A  "2"  is 
stored  in  MAJDIR. 


(1770)  (1770+9) 


(1800)  (1800+9) 


(1780)  (1780+9) 


(1790)  (1790+9) 


*  D  =  N,  E,  S,  or  W  indicating  north,  east,  south,  and  west  re¬ 
spectively. 
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If  the  component  of  the  wind  vector  in  the  (1805)  (1805+9) 

north  direction  is  the  greatest,  and  the 
one  in  the  west  is  next,  these  statements 
are  not  skipped.  The  north,  east,  south, 
and  west  components  are  classified  as  low, 
medium,  or  high  winds.  A  "1"  is  stored 
in  MAJDIR . 

If  the  component  of  the  wind  vector  in  the  (1825)  (1825+9) 

south  direction  is  greatest,  and  the  one 
in  the  east  is  next,  these  statements  are 
not  skipped.  The  north,  east,  south,  and 
west  components  of  wind  are  classified  as 
low,  medium,  or  high  winds.  A  "3"  is 
stored  in  MAJDIR. 


If  the  component  of  the  wind  vector  in  the  east  (1830)  (1830+9) 

is  greatest,  and  the  one  in  the  south  is 
next,  these  statements  are  not  skipped. 

The  north,  east,  south,  and  west  compon¬ 
ents  are  classified  as  low,  medium,  or 
high  winds.  A  "2"  is  stored  in  MAJDIR. 

This  do  loop  is  gone  through  a  maximum  of  six-  (730)  (730) 

teen  times.  This  loop  determines  the  pro¬ 
bability  of  spread  from  the  building  in 
question  to  all  its  neighboring  buildings. 

The  neighboring  buildings  are  taken  in  the 
following  order;  first,  second,  third,  and 
fourth  buildings  to  the  north;  first, 
second,  third,  and  fourth  buildings  to  the 
east;  first,  second,  third,  and  fourth 
buildings  to  the  south;  and  first  second, 
third,  and  fourth  buildings  to  the  west. 


These  statements  test  the  value  of  the  index  (730+1)  (367) 

variable,  JJ,  to  determine  which  neigh¬ 
boring  building  is  next  to  have  its  pro¬ 
bability  of  spread  computed. 


These  statements  are  not  skipped  if  the  index  (2000)  (720+1) 

variable  is  not  greater  than  four,  i.e. 
if  the  spread  consideration  is  to  the  north. 

If  the  value  of  the  index  variable  is  one, 
there  is  a  check  to  see  if  there  are  any 
buildings  to  the  north.  If  there  are  no 
buildings,  it  jumps  almost  to  the  end  of 
the  loop  where  all  the  probabilities  of 
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spread  to  the  north  are  set  equal  to  0,  and 
JJ  is  set  equal  to  four.  If  there  are  neigh¬ 
boring  buildings,  the  general  terms  S  and 
ARBLDG  are  set  equal  to  the  northern  flame 
height  and  the  northern  radiating  area  respec¬ 
tively  of  the  building  from  which  the  spread 
is  being  considered.  If  the  index  variable  is 
not  equal  to  one,  the  relative  classification 
of  the  northern  component  of  the  wind  is  used 
so  this  part  of  the  program  is  skipped.  If 
the  index  variable  is  one,  the  northern  com¬ 
ponent  of  the  wind  vector  is  tested  against 
zero.  If  the  northern  component  is  zero,  the 
relative  classification  is  light  wind.  If 
not,  the  value  is  compared  with  eight  and 
sixteen  to  determine  whether  it  is  a  light, 
medium,  or  high  wind. 


These  statements  are  analogous  to  the  state-  (2010) 

ments  from  (2000)  through  (720+1)  except 
the  southern  direction  is  under  considera¬ 
tion  rather  than  the  northern  and  the 
fifth  building  is  analogous  to  the  first. 

These  statements  are  analogous  to  the  statements  (2020) 
from  (2000)  through  (720+1)  except  the  south¬ 
ern  direction  is  under  consideration  rather 
than  the  northern  direction  and  the  ninth 
building  is  analogous  to  the  first. 

These  statements  are  analogous  to  the  statements  (2030) 
from  (2000)  through  (720+1)  except  the  west¬ 
ern  direction  is  under  consideration  rather 
than  the  northern  direction  and  the  13th 
building  is  analogous  to  the  first. 

The  component  of  the  wind  vector  which  is  stored  (2028) 
in  DMPHR  is  compared  with  eight  and/or  six¬ 
teen  to  classify  the  wind  component  as 
light,  medium,  or  high. 


(2010)  (750+1) 


(780+1) 


(860) 


The  radiator  shape  is  compared  to  1.5.  If  the 
flame  height  is  less  than  1.5,  the  class¬ 
ification  of  the  wind  component  is  checked. 
Otherwise,  there  is  a  jump  to  statement 
number  (1420)  or  (1425). 


(364) 


(700) 


(364) 
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If  the  wind  component's  classification  is  low, 
and  if  the  radiating  area  is  less  than  or 
equal  to  four  hundred  and  sixty-five,  the 
theoretical  separation  distance,  Y,  is 
determined  by  a  linear  equation  with  the 
radiating  area  as  its  variable  afterwhich 
there  is  a  jump  to  the  part  which  deter  ¬ 
mines  the  probability  of  spread.  If  the 
wind  component's  classification  is  light, 
and  if  the  radiating  area  is  greater  than 
four  hundred  and  sixty-five,  the  following 
quadratic  equation  is  solved: 


(1380)  (1395+1) 


-33.8z-2.53y  +  15.7  =  0 


where  y  is  the  separation  distance  in 
feet  divided  by  ten  and  z  is  the  radiat¬ 
ing  area  in  feet  squared  divided  by  one 
thousand.  The  procedure  used  here  is  to 
solve  for  y  and  multiply  the  resulting  y 
by  ten  to  get  the  separation  distance. 

If  the  classification  of  the  component  of  the 
wind  is  medium,  these  statements  are  not 
skipped.  The  radiating  area  is  compared 
to  thirteen  hundred.  The  procedure  is 
similar  to  that  in  statements  (1380) 
through  (1395+1)  except  the  linear  equa¬ 
tion  differs  and  the  quadratic  equation 
is  as  follows: 


(1400)  (1405+1) 


-34.3z-8.ly  +  44.6  =  0 


If  the  classification  of  the  wind  is  high,  the 
following  statements  are  not  skipped.  The 
radiating  area  is  compared  to  two  thousand 
three  hundred  and  eighty.  The  procedure 
is  similar  to  that  in  statements  (1380) 
through  (1395+1)  except  the  linear  equa¬ 
tion  differs  and  the  quadratic  equation 
is  as  follows 


(1410)  (1415+1) 


-29.4z-13.75y  +  69.9 
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The  radiator  shape  is  compared  to  8.  If  the 
flame  height  is  less  than  8  but  greater 
than  or  equal  to  1.5  and  the  classifica¬ 
tion  of  the  component  is  low,  these  state¬ 
ments  are  not  skipped.  The  radiating  area 
is  compared  to  seven  hundred  and  twenty- 
five.  The  procedure  is  similar  to  that  in 
statements  (1380)  through  (1395+1)  except 
the  linear  equation  differs  and  the  qua¬ 
dratic  equation  is  as  follows: 


(1420)  (1435+1) 


-29. 3z  -3 . 35y  +  21.2  =  0 


If  the  radiator  shape  is  greater  than  or  equal 
to  1.5  and  less  than  8,  and  if  the  class¬ 
ification  of  the  component  of  wind  is  med 
ium,  these  statements  are  not  skipped. 

The  radiating  area  is  compared  to  one 
thousand  six  hundred  and  fourty-five.  The 
procedure  is  similar  to  that  in  statements 
(1380)  through  (1395+1)  except  the  linear 
equation  differs  and  the  quadratic  equa¬ 
tion  is  as  follows: 


-30. 3z  -9 . 25y  +  49.8  =  0 


(1440)  (1445+1) 


If  the  radiator  shape  is  greater  than  or  equal 
to  1.5  and  less  than  8,  and  if  the  class¬ 
ification  of  the  component  of  wind  is  high, 
these  statements  are  not  skipped.  The  ra¬ 
diating  area  is  compared  to  one  thousand 
one  hundred  and  ten.  The  procedure  is 
similar  to  that  in  statements  (1380)  through 
(1395+1)  except  the  linear  equation  differs 
and  the  quadratic  equation  is  as  follows: 


(1450)  (1455+1) 


-33. 2z  -9.4y  +  36.8  =  0 
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If  the  radiator  shape  is  greaLer  than  H,  and  if  (1460)  (1470+1  ) 

the  classification  of  the  component  of 
the  wind  is  low,  these  statements  are 
not  skipped.  The  radiating  area  is  com¬ 
pared  to  one  thousand  four  hundred  and 
twenty.  Tire  procedure  is  similar  to  that 
in  statements  (  1380)  through  (1305+1) 
except  the  linear  equation  differs  and 
the  quadratic  equation  is  as  follows: 

y2  -21. 9z  -6 . 32y  +  31.1  =  O 


If  the  radiator  shape  is  greater  than  8,  and  if  (1475)  (1480+1  ) 

the  classification  cf  the  component  of 
the  wind  is  medium,  these  statements 
are  not  skipped.  The  radiating  area  is 
compared  to  two  thousand  three  hundred 
and  fifty.  The  procedure  is  similar  to 
that  in  statements  (1380)  through  (1395+1  ) 
except  the  linear  equation  differs  and  the 
quadratic  equation  is  as  follows: 

y2  -21. 4z  -10. 76y  +  50.2  =  0 


If  the  radiator  shape  is  greater  than  8,  and  if  (1485)  (1490) 

the  classi f ication  of  the  component  of 
the  wind  is  high,  these  statements  are 
not  skipped.  The  radiating  area  is  com¬ 
pared  to  two  thousand  five  hundred  and 
ninety.  The  procedure  is  similar  to 
that  in  statements  (1380)  through  (1395+1  ) 
except  the  linear  equation  differs  and  the 
quadratic  equation  is  as  follows: 

y2  -24. 2z  -12. 28y  +  62.75  =  0 


If  the  index  variable  JJ  is  one,  these  state-  (1500  )  (1368+1  ) 

ments  are  not  skipped.  The  spread  to 
the  first  building  to  the  north  from  the 
building  in  question  is  calculated  in 
these  statements.  If  the  distance  between 
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these  two  buildings  is  zero,  the  proba¬ 
bility  of  spread  is  set  equal  to  one,  the 
probability  the  building  will  burn  is  set 
equal  to  .98,  and  there  is  a  skip  to  a 
further  point  in  the  program.  If  the  dis¬ 
tance  is  greater  than  zero,  the  following 
steps  are  performed.  A  variable  x  is  cal¬ 
culated.  If  x  is  greater  than  1,  it  is 
set  equal  to  one.  If  x  is  less  than  O, 
it  is  set  equal  to  zero.  If  the  distance 
between  the  two  buildings  is  greater  than 
the  separation  distance,  the  probability 
of  spread  is  0.  The  direction  under  con¬ 
sideration  here  is  north.  North  is  com¬ 
pared  with  MAJDIR,  the  code  for  the  direc¬ 
tion  which  has  the  largest  amount  of  pos¬ 
itive  wind.  Depending  upon  whether  north 
is  with,  against  or  perpendicular  to  the 
major  direction  of  the  wind,  the  subrou¬ 
tines  KITH,  AGNT,  or  PERP  are  called  re¬ 
spectively. 

If  the  index  variable  is  two,  these  statements  (1504)  (1369+1) 

are  not  skipped.  The  spread  to  the  second 
building  to  the  north  from  the  building  in 
question  is  calculated  in  these  statements. 

The  procedure  is  the  same  as  in  statements 
(1503)  through  (1368+1  ). 

If  the  index  variable  is  three,  these  state-  (1505)  (1370+1) 

ments  are  not  skipped.  The  spread  to 
the  third  building  to  the  north  from  the 
building  in  question  is  calculated  in 
these  statements .  The  procedure  is  the 
same  as  in  statements  (  1503  )  through 
(1368+1  ). 

If  the  index  variable  is  four,  these  statements  (1507)  (1371+1) 

are  not  skipped.  The  spread  to  the  fourth 
building  to  the  north  from  the  building  in 
question  is  calculated  in  these  statements. 

The  procedure  is  the  same  as  in  statements 
(1503)  through  (  1368+1  ). 
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If  the  index  '’ariabic-  is  fi'/i  ,  hese  statements 
are  not  skipped.  The  spread  to  the  first 
building  to  the  east  from  the  building  in 
question  is  calculated  in  these  statements. 
The  procedure  is  the  same  as  in  statements 
(1503)  through  (1368  +  1)  except  the  direc¬ 
tion  under  consideration  here  is  east. 

If  the  index  variable  is  six,  these  statements 
are  not  skipped.  The  spread  to  the  second 
building  to  the  east  from  the  building  in 
question  is  calculated  in  these  statements. 
The  procedure  is  the  same  as  in  statements 
(1503)  through  (1368+1)  except  the  direc¬ 
tion  under  consideration  is  east. 

If  the  index  variable  is  seven,  these  statements 
are  not  skipped.  The  spread  to  the  third 
building  to  the  east  from  the  building  in 
question  is  calculated  in  these  statements. 
The  procedure  is  the  same  as  in  statements 
(1503)  through  (1368+1)  except  the  direc¬ 
tion  under  consideration  is  the  east. 

If  the  index  variable  is  eight,  these  statements 
are  not  skipped.  The  spread  to  the  fourth 
building  to  the  east  from  the  building  in 
question  is  calculated  in  these  statements. 
The  procedure  is  the  same  as  in  statements 
(1503)  through  (1368+1)  except  the  direc¬ 
tion  under  consideration  is  east. 

If  the  index  variable  is  nine,  these  statements 
are  not  skipped.  The  spread  to  the  first 
building  to  the  south  from  the  building  in 
question  is  calculated  in  these  statements. 
The  procedure  is  the  same  as  in  statements 
(1503)  through  (1368+1  )  except  the  direc¬ 
tion  under  consideration  is  the  south. 

If  the  index  variable  is  ten,  these  statements 
are  not  skipped.  The  spread  to  the  second 
building  to  the  south  from  the  building  in 
question  is  calculated  in  these  statements. 
The  procedure  is  the  same  as  in  statements 
(1503)  through  (1368+1)  except  the  direc¬ 
tion  under  consideration  is  the  south. 


(1508)  (1372+1) 


(1510)  (1373+1) 


(1511)  (1374+1) 


(1515)  (1375+1) 


(1516)  (1376+1) 


(1518)  (1377+1) 
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If  the  index  variable  is  eleven,  these  state-  (1519)  (1378+1) 

ments  are  not  skipped.  The  spread  to  the 
third  building  to  the  south  from  the  build¬ 
ing  in  question  is  calculated  in  these 
statements.  The  procedure  is  the  same  as 
in  statements  (1503)  through  (1368+1)  ex¬ 
cept  the  direction  under  consideration  is 
south. 

If  the  index  variable  is  twelve,  these  state-  (1521)  (1360+1) 

ments  are  not  skipped.  The  spread  to  the 
fourth  building  to  the  south  from  the  build¬ 
ing  in  question  is  calculated  in  these 
statements.  The  procedure  is  the  same  as 
in  statements  (1503)  through  (1368+1)  ex¬ 
cept  the  direction  under  consideration  is 
south. 

If  the  index  variable  is  thirteen,  these  state-  (1522)  (1361+1) 

ments  are  not  skipped.  The  spread  to  the 
first  building  to  the  west  from  the  build¬ 
ing  in  question  is  calculated  in  these 
statements.  The  procedure  is  the  same  as 
in  statements  (1503)  through  (1368+1)  ex¬ 
cept  the  direction  under  consideration  is 
west . 

If  the  index  variable  is  fourteen,  these  state-  (1524)  (1362+1) 

ments  are  not  skipped.  The  spread  to  the 
second  building  to  the  west  from  the  build¬ 
ing  in  question  is  calculated  in  these 
statements.  The  procedure  is  the  same  as 
in  statements  (1503)  through  (1368+1)  ex¬ 
cept  the  direction  under  consideration  is 
west . 

If  the  index  variable  is  fifteen,  these  state-  (1525)  (1363+1) 

ments  are  not  skipped.  The  spread  to  the 
third  building  to  the  west  from  the  build¬ 
ing  in  question  is  calculated  in  these 
statements.  The  procedure  is  the  same  as 
in  statements  (1503)  through  (1368+1)  ex¬ 
cept  the  direction  under  consideration  is 
west . 
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STATEMENT  NUMBER 


From 


Throuqh 


If  the  index  variable-  is  sixteen,  these  state-  (1527)  (1364+1  ) 

ments  are  not  skipped.  The  spread  to  the 
fourth  building  to  the  west  from  the  build¬ 
ing  in  question  is  calculated  in  these 
statements.  The  procedure  is  the  same  as 
in  statements  (1503)  through  (1368+1)  ex¬ 
cept  the  direction  under  consideration  is 
wes  t . 

If  the  number  of  neighboring  buildings  to  the  (1587)  (9040+1) 

north  of  the  building  in  question  is  less 
than  four,  and  the  index  variable  equals 
the  number  of  buildings  to  the  north,  the 
remaining  probabilities  of  spread  to  the 
north  are  set  equal  to  zero.  The  index 
variable  is  set  to  four. 

If  the  number  of  neighboring  buildings  to  the  (9010)  (9090+1) 

east  of  the  building  is  less  than  four, 
and  the  probabilities  of  spread  to  all 
these  buildings  to  the  east  have  been  cal¬ 
culated,  the  remaining  probabilities  of 
spread  to  the  east  are  set  equal  to  zero. 

The  index  variable  is  set  to  eight. 

If  the  number  of  neighboring  buildings  to  the  (9060)  (9140+2) 

south  of  the  building  is  less  than  four, 
and  the  probabilities  of  spread  to  all 
these  buildings  to  the  south  have  been  cal¬ 
culated,  the  remaining  probabilities  of 
spread  to  the  south  are  set  equal  to  zero. 

The  index  variable  is  set  to  twelve. 

If  the  number  of  neighboring  buildings  to  the  (9110)  (9190+1) 

west  of  the  building  in  question  is  less 
than  four,  and  the  probabilities  of  spread 
to  all  these  buildings  to  the  west  have 
been  calculated,  the  remaining  probabilities 
of  spread  to  the  west  are  set  equal  to  zero. 

The  index  variable  is  set  to  sixteen. 

This  is  the  end  of  the  loop  which  is  passed  (1597)  (1597) 

through  a  maximum  of  16  times  per  build¬ 
ing  to  calculate  the  probabilities  of 
spread  to  its  neighboring  buildings. 
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STATEMENT  NUMBER 


From 


Through 


The  probability  of  building  ignition  is  com-  (370)  (370) 

puted. 

The  angle  of  elevation,  probability  of  igni-  (3708)  (3711+2) 

tion  of  an  exposed  room  and  probability 
of  building  ignition  from  thermal  pulse 
are  not  written  on  a  new  page  of  output 
if  the  number  of  lines  on  the  page  is  less 
than  fifty-five.  The  number  of  lines  is 
increased  by  two. 

The  angle  of  elevation,  probability  of  ignition  (3707)  (3715+1) 

of  an  exposed  room,  and  probability  of 
building  ignition  from  thermal  pulse  are 
written  on  a  new  page  if  the  number  of  lines 
is  greater  than  or  equal  to  fifty-five.  The 
number  of  lines  is  set  equal  to  two. 

This  is  the  end  of  the  loop  which  varies  the  (3710)  (3710) 

angle  of  elevation  and  the  probability  of 
ignition  of  an  exposed  room. 

The  results  are  printed  out.  These  results  (1270)  (1265) 

are:  the  block,  blockside  and  lot  num¬ 

bers,  the  radiating  areas,  the  flame 
heights,  the  radiating  shapes,  the  separa¬ 
tion  distances  and  the  Gage-Babcock  index 
of  the  building  in  question,  as  well  as, 
the  probabilities  of  spread  to  its  neigh¬ 
boring  buildings  and  the  probability  the 
building  in  question  will  burn  down. 

This  is  the  end  of  the  loop  which  considers  each  (371)  (371) 

building  singly.  When  this  point  is  reached, 
information  on  the  next  building  is  read  from 
cards,  and  the  process  continues  as  described 
above . 

This  is  the  end  of  the  program.  (545)  (545) 
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SUBROUTINE  AGNT  (KV,  X,  PR) 


This  is  the  subroutine  used  if  the  largest  wind  component 
of  the  four  basic  directions  is  against  the  spread  direction 
which  is  being  considered.  X  and  KV  are  input;  PR  output. 

The  speed  of  the  wind  in  the  direction  of  spread  consideration 
and  the  ratio  X  are  the  variables  which  determine  the  probability 
of  fire  spread  from  one  building  to  a  particular  building  in  a 
particular  direction.  On  exit,  the  probability  of  spread  has 
been  computed. 


SUBROUTINE  PERP  (KV,  X,  PR) 


This  is  the  subroutine  used  if  the  largest  wind  component 
of  the  four  basic  directions  is  perpendicular  to  the  spread 
direction  which  is  being  considered.  X  and  KV  are  input  to 
the  subroutine;  PR  output.  See  the  subroutine  explanation  for 
AGNT  above  for  the  variables  upon  which  the  probability  of  spread 
depends.  On  exit,  the  probability  of  spread  has  been  computed. 
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SUBROUTINE  WITH  (KV,  X,  PR) 


This  is  the  subroutine  used  if  the  largest  wind  component 
of  the  four  basic  directions  is  in  the  same  direction  as  the 
spread  direction  which  is  being  considered.  X  and  KV  are  in¬ 
put;  PR  output.  See  the  subroutine  explanation  for  AGNT  pre¬ 
ceding  for  variables  upon  which  the  probability  of  spread  depends. 
The  result  is  that  the  probability  of  spread  has  been  computed. 


SUBROUTINE  KV  CONS  ( DMPHR,  KV) 


This  subroutine  is  to  determine  from  the  tniles  per  hour 
if  the  wind  is  light,  moderate  or  high.  DMPHR  is  input;  KV 
output.  Thus,  there  is  an  exit  of  general  wind  classification. 


SECTION  3 
FIREFLY  2 
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I.  OPERATION 


The  general  calculations  of  FIREFLY  2  are  neither  lengthy 
nor  involved.  FIREFLY  1  has  done  most  of  the  work  in  generat¬ 
ing  probabilities  of  ignition  from  the  thermal  pulse  for  fifteen 
different  cases  (five  exposed  room  ignition  probabilities  and 
three  fireball  elevation  angles )  and  the  complete  interaction 
probabilities  that  govern  fire  spread.  The  basic  tasks  of 
FIREFLY  2  are  to  generate  random  numbers,  compare  these  random 
numbers  to  the  various  probabilities,  and  keep  a  record  of  the 
progress  of  fires  from  both  thermal  pulse  and  spread.  As  men¬ 
tioned  previously,  FIREFLY  2  operates  100  times  upon  the  en¬ 
vironment  of  buildings  for  a  given  set  of  conditions;  thus 
FIREFLY  2  will  actually  conduct  1500  runs  in  total. 

Assume  that  a  set  of  four  buildings  are  being  examined  as 

shown  in  Figure  3-1.  The  values  of  pfa  represent  probabilities 

of  building  ignitions  from  the  thermal  pulse;  values  of  s  •  are 

^  J 

combined  spread  probabilities.  Table  3-1  is  a  typical  tabula¬ 
tion  of  random  numbers.  Reading  down  the  first  column  and  test¬ 
ing  the  first  random  number  against  building  #  1,  we  find  the 
random  number  (.51772)  to  be  greater  than  the  building  ignition 
probability  in  which  case  no  ignition  takes  place.  Continuing 
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FIGURE  3-1 


SAMPLE  BUILDING  ANALYSIS 
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TABLE 


to  use  random  numbers  in  column  1,  we  find  that  only  building 
number  3  ’  s  assumed  to  be  burning.  FIREFLY  2  would  record 
this  event  and  proceed  to  assess  fire  spread. 

The  probability  of  fire  spread  from  building  #  3  to  build¬ 
ing  #  4  is  0.75;  the  next  random  number  is  0.03585,  hence  spread 
occurs.  The  spread  from  3  to  1  does  not  occur,  however. 

Now  that  building  #  4  is  burning  the  only  spread  proba¬ 
bility  of  interest  is  S42  =  0.60.  The  next  random  number  is 
0.15630  and  now  building  #  2  is  ablaze.  In  like  manner,  S21 

is  0.40  and  is  greater  than  0.09448  so  that  building  #  1  also 
burns . 


In  this  example,  all  buildings  were  destroyed.  As  ex¬ 
plained  earlier,  FIREFLY  2  would  operate  an  additional  99 
times  on  this  environment  saving  the  results  each  time  in  terms 
of  which  buildings  were  destroyed  by  what  agent.  After  the 
first  100  passes,  a  new  p^  would  be  introduced  (as  a  function 
of  a  change  in  the  probability  of  exposed  room  ignition  from 
0.1  to  0.3)  and  another  100  cases  run.  After  500  cases  have 
been  analyzed,  the  angle  of  elevation  is  changed  from  5C  to  10° 
and  the  entire  process  of  500  runs  completed.  The  final  500 
cases  are  conducted  for  the  30°  angle  of  elevation. 
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II.  OUTPUT 

The  output  from  FIREFLY  2  normally  proceeds  directly  into 
FIREFLY  3  for  summary  although  the  output  could  be  printed  in 
any  one  of  three  formats  as  desired.  These  formats  are: 


A.  A  complete  summary  case-by-case  of  every  building 
which  was  destroyed  and  the  cause  of  this  destruc¬ 
tion  (See  Table  3-2  for  sample),  giving  building 
address,  all  probabilities  and  random  numbers  used, 
and  the  building  from  which  the  fire  spread,  if 
applicable. 

B.  A  condensed  form  of  A.  above  shown  in  Table  3-3. 

C.  A  summary  of  B.  above  shown  in  Table  3-4. 
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TABLE  3-2 


BLOCK 

DIREC¬ 

TION 

LOT 

NO. 

ADDRESS 

FIFTH 

RANDOM 

NUMBER 

THERMAL 

PULSE 

FOURTH 

RANDOM 

NUMBER 

SPREAD 

PROBAB¬ 

ILITY 

16 

3 

3 

33  LONGFLLW 
WASH,  D.C. 
22110021 

0.7394 

0.1175 

0.5526 

16 

3 

5 

25  LONGFLLW 
WASH,  D.C. 

221 L0021 

0.9597 

0.2213 

0.5047 

20 

1 

6 

18  LONGFLLW 
WASH,  D.C. 
22110021 

0.3718 

0.2890 

0.0082 

1.0000 

17 

1 

4 

120  LONGFLLW 
WASH,  D.C. 
22110021 

0.4245 

0.2660 

0.4336 

17 

1 

3 

122  LONGFLLW 
WASH,  D.C. 
22110021 

0.4930 

0.2660 

0.1246 

1.0000 

18 

1 

1 

118  LONGFLLW 
WASH,  D.C. 
22110021 

0.8472 

0.3144 

0.4930 

18 

1 

2 

116  LONGFLLW 
WASH,  D.C. 
22110021 

0.1284 

0.3144 

0.6354 

1.0000 

18 

1 

4 

112  LONGFLLW 
WASH,  D.C. 
22110021 

0.4343 

0.3144 

0.5436 

18 

1 

5 

110  LONGFLLW 
WASH,  D.C. 
22110021 

0.4187 

0.3144 

0.1425 

1.0000 

18 

1 

3 

114  LONGFLLW 
WASH,  D.C. 
22110021 

0.1369 

0.3144 

0.0403 

1.0000 

18 

1 

6 

108  LONGFLLW 
WASH,  D.C. 
22110021 

0.5878 

0.3144 

0. 1 369 

18 

1 

7 

106  LONGFLLW 
WASH,  D.C. 
22110021 

0.8070 

0. 3144 

0.4834 

18 

1 

8 

104  LONGFLLW 
WASH,  D.C. 
22110021 

0.3993 

0.3144 

0.0796 

18 

1 

9 

102  LONGFLLW 
WASH,  D.C. 
22110021 

0.9937 

0.3144 

0.0415 

1.0000 

18 

2 

1 

5514  1ST  NW 
WASH,  D.C. 
22110021 

0.4596 

0.3995 

0.2175 
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TABLE  3-2  (Continued) 


ADDRESS 

FIRST 

RANDOM 

NUMBER 

BURN  PROBABILITY 
FROM  SPREAD 

2ND 
RAN  DM 
NUMB. 

FIRE 

FIRE 

FROM 

BLK 

CAUGHT 
,  BLDG 
DIR  LOT 

33  LONGFLLW 
WASH,  D.C. 
22110021 

0.0934 

0. 7394 

YES 

2  5  LONGFLLW 
WASH,  D.C. 
22110021 

0. 7322 

0.9597 

YES 

18  LONGFLLW 
WASH,  D.C. 
22110021 

0.6818 

0.5878 

0.6900 

YES 

16 

3  5 

120  LONGFLLW 
WASH,  D.C. 
22110021 

0.9290 

0.4245 

YES 

122  LONGFLLW 
WASH,  D.C. 
22110021 

0.8088 

0.9800 

0.6842 

YES 

17 

1  4 

118  LONGFLLW 
WASH,  D.C. 
22110021 

0.6701 

0.8472 

YES 

116  LONGFLLW 
WASH,  D.C. 
22110021 

0.8819 

0.9800 

0.2465 

YES 

18 

1  1 

112  LONGFLLW 
WASH,  D.C. 
22110021 

0.9889 

0.4343 

YES 

110  LONGFLLW 
WASH,  D.C. 
22110021 

0.2?  ’fc 

0.9800 

0.1381 

YES 

18 

1  4 

114  LONGFLLW 
WASH,  D.C. 
22110021 

^483 

0.9800 

0.5886 

YES 

18 

1  4 

108  LONGFLLW 
WASH,  D.C. 
22110021 

0.8623 

0.5878 

YES 

106  LONGFLLW 
WASH,  D.C. 
22110021 

0.1618 

0.8070 

YES 

104  LONGFLLW 
WASH,  D.C. 
22110021 

0.1598 

0.3993 

YES 

102  LONGFLLW 
WASH,  D.C. 
22110021 

0. 5176 

0.9800 

0.4761 

YES’ 

18 

1  8 

5514  1ST  NW 
WASH,  D.C. 
22110021 

0.6210 

86 
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YES 

SUMMARY  WITH  ANGLE  OF  ELEVATION=30  AND  ROOM  IGNITION  PROB=0.3 
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BLOCK 

DIR 

LOT 

TYPE  OF 

FIRE 

2 

1 

1 

THERMAL 

PULSE 

2 

1 

2 

SPREAD 

3 

1 

1 

THERMAL 

PULSE 

3 

1 

2 

THERMAL 

PULSE 

3 

1 

6 

THERMAL 

PULSE 

4 

1 

4 

THERMAL 

PULSE 

6 

1 

1 

THERMAL 

PULSE 

7 

1 

4 

THERMAL 

PULSE 

11 

1 

2 

SPREAD 

11 

1 

3 

SPREAD 

11 

1 

4 

THERMAL 

PULSE 

11 

1 

5 

SPREAD 

11 

1 

6 

SPREAD 

11 

1 

7 

SPREAD 

11 

1 

8 

SPREAD 

11 

1 

9 

SPREAD 

11 

1 

10 

SPREAD 

12 

1 

1 

SPREAD 

12 

1 

2 

THERMAL 

PULSE 

12 

1 

3 

THERMAL 

PULSE 

13 

1 

3 

THERMAL 

PULSE 

13 

1 

5 

THERMAL 

PULSE 

13 

1 

7 

THERMAL 

PULSE 

13 

1 

8 

THERMAL 

PULSE 

13 

1 

9 

THERMAL 

PULSE 

17 

1 

2 

SPREAD 

17 

1 

3 

SPREAD 

17 

1 

4 

THERMAL 

PULSE 

18 

1 

1 

THERMAL 

PULSE 

18 

1 

2 

SPREAD 

TABLE  3-3 
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III. 


DATA  DESCRIPTION 


In  order  to  operate  FIREFLY  2,  the  following  cards  must 
be  prepared.  All  values  are  right  justified 


A.  Card  Type  1 — Random  Numbers  (1  card) 


Cols. 

Description 

3-8 

Any  six  random  digits  (may  be  selected  from 
Table  3-1). 

12-17 

Any  six  random  digits. 

B.  Card  Type 

2 — Building  Information  (1  card) 

Cols . 

Description 

1-4 

Total  number  of  buildings. 

C.  Card  Type 

3 — Block  Information  (1  card) 

Cols . 

Description 

1-4 

Total  number  of  blocks,  M. 

D.  Card  Type  4 — Number  of  Buildings  Per  Blockside 

The  number  M  in  the  above  card  is  the  number  of  cards 
of  this  type. 

Cols .  Description 

7-8  Number  of  buildings  on  the  north  side  of  a 

particular  block,  KC  (1,1). 
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Cols . 
10-11 

13-14 

16-17 


Number  of  buildings  on  the  east  side  of 
this  same  particular  block,  KC  (1,2). 


Number  of  buildings  on  the  south  side  of 
this  same  particular  block,  KC  (1,3). 


Number  of  buildings  on  the  west  side  of 
this  same  particular  block,  KC  (1,4). 


Card  Type  5--Number  of  Buildings  of  Particular  Interest 
(1  card) 


Cols 


Description 


1-3  A  value  which  represents  the  number  of  build 

ings  to  be  summarized  in  detail  in  the  final 
output.  This  option  is  valuable  if  in  a 
given  analysis,  it  is  desired  to  examine  the 
number  of  times  a  particular  building  or 
buildings  was  destroyed  by  either  pulse  or 
spread  (often  used  when  a  given  urban  sample 
contains  shelter  buildings). 


Card  Type  6 — Buildings  of  Particular  Interest  (1  card/ 
building ) 


(NOTE:  This  card  must  appear  if  the  value  in  Card  Type 

5  is  not  zero,  and  omitted  if  the  value  in  Type 
5  is  zero) 


Cols. 

1-2 

4 


Description 


Block  number  of  building  of  particular  in¬ 
terest. 


The  direction  number. 


6-7 


Lot  number  of  the  building  of  particular  in¬ 
terest. 


G. 


Card  Type  7 — Building  Information  (first  of  two  cards/ 
building ) 


Building  information  is  to  be  arranged  in  ascending 
order  according  to  the  order  number  with  Card  7  pre¬ 
ceding  Card  8  of  the  same  number. 


Cols .  Description 

1-2  Block  number  of  building  A  with  the  informa¬ 

tion  on  this  card  and  the  following  card. 

The  limitations  on  the  direction  numbers  and 
the  lot  numbers  are  the  same  as  specified  in 
the  FIREFLY  1  write-up. 

4  Direction  number  of  building  A  with  the  in¬ 

formation  on  this  card  and  the  next  card. 


6-7 

Lot 

9-13 

The 

the 

15-19 

The 

the 

21-25 

The 

the 

27-31 

The 

the 

33-37 

The 

the 

39-43 

The 

the 

45-49 

The 

the 

51-55 

The 

the 

number  of  building  A. 

order  number  of  the  third  building  to 
north  of  building  A. 

order  number  of  the  fourth  building  to 
north  of  building  A. 

order  number  of  the  first  building  to 
east  of  building  A. 

order  number  of  the  second  building  to 
east  of  building  A. 

order  number  of  the  third  building  to 
east  of  building  A. 

order  number  of  the  fourth  building  to 
east  of  building  A. 

order  number  of  the  first  building  to 
south  of  building  A. 

order  number  of  the  second  building  to 
south  of  building  A. 
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Cols 


Description 


\ 


57-61  The  order  number  of  the  third  building  to 

the  south  of  building  A. 

63-67  The  order  number  of  the  fourth  building  to 

the  south  of  building  A. 

69-73  The  order  number  of  the  first  building  to 

the  west  of  building  A. 

80  A  "3"  is  punched  for  identification. 


H.  Card  Type  8 — Building  Information  is  to  be  Arranged 

In  Ascending  order  According  to  the  Order  Number  With 
Card  7  preceding  Card  8  of  the  same  Order  Number. 


Cols.  Description 

1-2  Block  number  of  building  A  with  its  infor¬ 

mation  on  this  card. 

4  Direction  number  of  building  A. 

6-7  Lot  number  of  building  A. 

9-15  The  order  number  of  the  second  building  to 

the  west  of  building  A. 

15-19  The  order  number  of  the  third  building  to 

the  west  of  building  A. 

21-25  The  order  number  of  the  fourth  building  to 

the  west  of  building  A. 

27-32  The  first  six  letters  and/or  numbers  of 
the  street  address  of  building  A. 

33-38  The  last  six  letters  and/or  numbers  of 

the  street  address  of  building  A. 

40-45  The  first  six  letters  and/or  numbers  of  the 
city  and  state  part  of  the  address. 

46-51  The  last  six  letters  and/or  numbers  of  the 

city  and  state  part  of  the  address. 
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Cols 


Description 


53-60  The  Standard  Location  or  any  other  identi¬ 

fication  code  number. 

67-71  The  order  number  of  the  first  building  to 

the  north  of  building  A. 

73-77  The  order  number  of  the  second  building  to 

the  north  of  building  A. 

80  A  "4"  for  identification. 


During  execution,  FIREFLY  2  reads  the  input  tape, 
which  is  the  output  from  FIREFLY  1.  The  tape  con¬ 
tains  information  in  the  form  as  follows: 

First  record  to  be  read  in  which  is  not  blank 

Cols .  Description 

22-23  The  angle  of  elevation. 

61-63  The  probability  of  ignition  of  an  exposed 

room. 


Second  record  to  be  read  in  which  is  not  blank 

Cols .  Description 

4-5  The  block  number  of  building  A. 

11  The  direction  number  of  building  A. 

18-19  The  lot  number  of  building  A. 

22-27  The  probability  of  spread  from  building  A 

to  the  first  neighboring  building  to  the 
north  of  A. 


30-35 


The  probability  of  spread  from  building  A 
to  the  first  building  to  the  east. 


Cols . 
38-43 

46-51 

67-72 

Third 

Cols . 
22-27 

30-35 

38-43 

46-51 

Fourth 

Cols . 
22-27 

30-35 

38-43 

46-5 


Description 

The  probability  of  fire  spread  from  build 
ing  A  to  the  first  building  to  the  south 
of  A. 

Tiie  probability  of  spread  from  building  A 
to  the  first  building  to  the  west  of  A. 

The  probability  building  A  will  catch  on 
fire . 


record  to  be  read  in  which  is  not  blank 


Description 

The  probability  of  spread  from  building  A 
to  the  second  neighboring  building  to  the 
north  of  A. 

The  probability  of  spread  from  building  A 
to  the  second  building  to  the  east. 

The  probability  of  fire  spread  from  build¬ 
ing  A  to  the  second  building  to  the  south 
of  A. 

The  probability  of  spread  from  building  A 
to  the  second  building  to  the  west  of  A. 


record  to  be  read  in  which  is  not  blank 


Description 

The  probability  of  spread  from  building  A 
♦  '«  *he  third  neighboring  building  to  the 
1  '  o r  A. 

probability  of  spread  from  building  A 
'he  third  building  to  the  east. 

fh«'  probability  of  fire  spread  from  build- 
i il<3  lV  *  o  the  third  building  to  the  south  of 


Thr  *v*»iiity  of  spread  from  building  A 

vo  -  _rd  building  to  the  west  of  A. 
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Fifth  record  to  be  read  in  which  is  not  blank 


Cols . 
22-27 

30-35 

38-43 

46-51 


Description 

The  probability  of  spread  from  building  A 
to  the  fourth  neighboring  building  to  the 
north  of  A. 

The  probability  of  spread  from  building  A 
to  the  fourth  building  to  the  east. 

The  probability  of  fire  spread  from  build¬ 
ing  A  to  the  fourth  building  to  the  south 
of  A. 

The  probability  of  spread  from  building  A 
to  the  fourth  building  to  the  west  of  A. 
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IV.  DESCRIPTION  OF  PROCESSING  SEQUENCE 


STATEMENT  NUMBER 


From 


Through 


A  zero  in  KWRITE  indicates  no  intermediate  (0+3)  (0+3) 

steps  will  be  printed  out  for  any  of 
the  buildings.  A  one  indicates  inter¬ 
mediate  steps  will  be  written  out. 

Two  random  numbers  are  read  in.  (0+4)  (10) 

The  number  of  buildings  to  be  considered  is  (10+1)  (10+1) 

read  into  core. 

The  number  of  block  to  have  buildings  read  (10+2)  (20) 

in  is  read  into  core. 

This  is  a  do  loop  which  reads  in  the  number  (20+1)  (35) 

of  buildings  per  blockside  for  each 
block,  i.e.  KC(I,J). 

This  is  the  beginning  of  the  loop  which  varies  (35+1)  (35+1) 

the  block  number  so  that  there  is  a  clear¬ 
ing  of  storage  location  KR(I,J,K)  which 
indicates  whether  or  not  a  building  is  to 
have  a  running  total  of  the  number  of 
times  it  catches  fire  from  thermal  pulse 
and  from  spread  in  the  hundred  runs  where 
the  angle  of  elevation  and  the  probability 
of  ignition  of  an  exposed  room  is  fixed. 

The  direction  number  is  varied  in  this  state-  (35+2)  (35+2) 

ment . 

If  the  number  of  buildings  on  a  blockside  is  (35+3)  (35+5) 

0,  there  is  a  jump  to  the  end  of  the  loop. 

The  index  variable  is  the  lot  number. 

This  loop  clears  the  storage  location  KR 
(I,  J,K). 

Read  into  core  is  the  card  which  has  the  NDETAIL,  (25+1)  (26+1) 

number  of  buildings  of  particular  interest. 

If  this  number  is  0,  there  is  a  jump  to 
statement  number  (48). 
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STATEMENT  NUMBER 
From _ Through 

The  block,  lot,  and  direction  numbers  of  those  (26+2)  (28) 

buildings  of  particular  interest  are  read 
into  core  and  the  entry  in  table  KR  of  "1" 
indicates  that  they  are  to  have  their  total 
number  of  times  caught  on  fire  from  spread 
and  the  pulse  calculated  and  written  out. 

The  general  comments  and  the  two  initial  random  (48)  (60) 

numbers  are  written  out. 

This  is  a  do  loop  which  is  gone  through  N  times.  (80)  (120) 

The  order  numbers  of  the  first,  second,  third, 
and  fourth  buildings  to  the  north,  east,  south 
and  west  of  the  building  in  question  are  read 
in.  Also  read  into  core  is  the  address. 

This  is  the  beginning  of  the  do  loop  whichQ varies  (120+1)  (120+1) 

the  angle  of  elevation  from  30  to  10°  and 
finally  to  5  .  This  loop  includes  the  rest 
of  the  program  minus  the  "STOP"  and  "END" 
cards . 

This  is  the  beginning  of  the  do  loop  which  in-  (120+2)  (120+2) 

itially  sets  the  probability  of  an  exposed 
room  ignition  to  .1  and  then  increments  it 
by  .2  through  .9.  This  loop  also  includes 
the  rest  of  the  program  excluding  the  "STOP" 
and  "END"  cards. 


This  is  the  beginning  of  the  loop  which  clears  (120+3)  (120+3) 

the  locations  in  table  TPSP  so  the  total 
number  of  times  a  building  catches  on  fire 
from  the  thermal  pulse  or  from  spread  with 
a  fixed  angle  of  elevation  and  probability 
of  ignition  of  an  exposed  room  can  be  com¬ 
puted  accurately.  The  index  variable  is 
the  block  number. 


The  index  variable  is  the  direction  number.  (120+4)  (120+4) 

A  simple  variable  is  set  equal  to  KC(I,J),  the  (120+5)  (120+5) 

number  of  buildings  on  the  blockside  de¬ 
fined  by  the  two  index  variables  above.  If 
this  simple  variable  is  zero,  there  is  a 
jump  to  the  end  of  the  loop.  If  this  vari¬ 
able  is  not  zero,  the  index  variable  is  the 
lot  number.  TPSP(I,J,K)  is  cleared.  This 
is  the  end  of  the  loop. 
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STATEMENT  NUMBER 
From _ Through 


This  is  the  beginning  of  the  loop  which  reads  (1200)  (1205) 

in  the  output  tape  from  FIREFLY  1.  For 
a  given  angle  of  elevation  and  a  given 
probability  of  ignition  of  an  exposed  room 
the  results  of  the  FIREFLY  1  run  are  read 
for  all  the  buildings. 

If  the  angle  of  elevation  is  30°  and  the  pro-  (1210)  (1212+1) 

bability  of  exposed  room  ignition  is  .1, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  The 
angle  of  elevation,  the  probability  of  ex¬ 
posed  room  ignition,  the  probability  of 
building  ignition  from  the  thermal  pulse, 
the  block,  direction,  and  lot  numbers, 
the  probability  the  building  in  question 
will  catch  on  fire  and  the  probabilities 
of  spread  from  the  building  in  question 
to  its  neighboring  buildings  are  read  into 
core.  There  is  a  jump  to  statement  number 
(1310). 

If  the  angle  of  elevation  is  30°  and  probability  (1215)  (1217+1) 

of  exposed  room  ignition  is  .3,  these  state¬ 
ments  to  read  in  the  output  tape  from  FIRE¬ 
FLY  1  are  not  skipped.  (See  Description  of 
Processing  Sequence  for  statements  (1210) 
through  (1212+1)  for  description  of  tape 
information  read  in). 

If  the  angle  of  elevation  is  30° and  the  proba-  (1220)  (1227+1) 

bility  of  exposed  room  ignition  is  .5, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped. 

(See  Description  of  Processing  Sequence 
for  statements  (1210)  through  (1212+1) 
for  the  description  of  tape  information 
read  in. ) 

If  the  angle  of  elevation  is  30°  and  the  pro-  (1230)  (1232+1) 

bability  of  exposed  room  ignition  is  .7, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sequence  for 
statements  (1210)  through  (1212+1)  for  the 
description  of  tape  information  read  in. ) 
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STATEMENT  NUMBER 


From 


Through 


If  the  angle  of  elevation  is  30  and  the  pro-  (1235)  (1237+1) 

bability  of  exposed  room  ignition  is  .9, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sequence  for 
statements  (1210)  through  (1212+1)  for  the 
description  of  tape  information  read  in. ) 

If  the  angle  of  elevation  is  10°  and  the  proba-  (1240)  (1247+1) 

bility  of  exposed  room  ignition  is  .1,  these 
statements  to  read  in  the  output  tape  from 
FIREFLY  1  are  not  skipped.  (See  Descrip¬ 
tion  of  Processing  Sequence  for  statements 
(1210)  through  (1212+1)  for  the  description 
of  the  information  read  in.  ) 

If  the  angle  of  elevation  is  10°  and  the  proba-  (1250)  (1252+1) 

bility  of  exposed  room  ignition  is  .3, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sequence  for 
statements  (1210)  through  (1212+1)  for  the 
description  of  the  information  read  in.) 

If  the  angle  of  elevation  is  10°  and  the  proba-  (1255)  (1262+1) 

bility  of  exposed  room  ignition  is  .5, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sequence  for 
statements  (1210)  through  (1212+1)  for  the 
description  of  the  information  read  in. ) 

If  the  angle  of  elevation  is  10°  and  the  proba-  (1265)  (1267+1) 

bility  of  exposed  room  ignition  is  .7, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sequence  for 
statements  (1210)  through  (1212+1)  for  the 
description  of  the  information  read  in. ) 
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STATEMENT  NUMBER 
From  Through 


If  the  angle  of  elevation  is  lo  and  the  pro¬ 
bability  of  exposed  room  ignition  is  .9, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sequence  for 
statements  (1210)  through  (1212+1)  for 
the  description  of  the  information  read 
in.  ) 

If  the  angle  of  elevation  is  5°  and  the  pro¬ 
bability  of  exposed  room  ignition  is  .1, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sequence  for 
statements  (1210)  through  (1212+1)  for 
the  description  of  the  information  read 
in.  ) 

If  the  angle  of  elevation  is  5°  and  the  pro-  (1285)  (1287+1) 

bability  of  exposed  room  ignition  is  .3, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sequence  for 
statements  (1210)  through  (1212+1)  for 
the  description  of  the  information  read 
in.  ) 

If  the  angle  of  elevation  is  5  and  the  pro-  (1290)  (1297+1) 

bability  of  exposed  room  ignition  is  .5, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sequence  for 

statements  (1210)  through  (1212+1)  for 

the  description  of  the  information  read 
in.  ) 

If  the  angle  of  elevation  is  5  and  the  pro-  (1300)  (1302+1) 

bability  of  exposed  room  ignition  is  .7, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sequence  for 

statements  (1210)  through  (1212+1)  for 

the  information  read  in. ) 


(1270)  (1272+1) 


(1275)  (1282+1) 
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If  the  angle  of  elevation  is  5  and  the  proba-  (1305)  (1307) 

bility  of  exposed  room  ignition  is  .9, 
these  statements  to  read  in  the  output 
tape  from  FIREFLY  1  are  not  skipped.  (See 
Description  of  Processing  Sei  uence  for 
statements  (1210)  through  (1212+1)  for  the 
description  of  the  information  read  in.  ) 

The  probability  of  building  ignition  from  thermal  (1310)  (1310) 

pulse  is  put  in  a  table  PRB(I,J,K). 


This  is  the  end  of  the  do  loop  which  reads  in  (1320)  (1320) 

the  output  tape  from  FIREFLY  1.  This  loop 
is  gone  through  N  times  with  the  informa¬ 
tion  from  a  particular  individual  building 
read  into  core  with  each  pass  through  the 
loop. 


This  is  the  beginning  of  the  do  loop  which  cal-  (1320+1)  (1320+1) 
culates  which  buildings  catch  fire  as  a 
result  of  the  thermal  pulse  and  fire  spread 
using  the  Monte  Carlo  method.  This  loop 
is  passed  through  one  hundred  times  for 
each  combination  of  the  angle  of  fireball 
elevation  and  probability  of  ignition  of 
an  exposed  room. 

The  two  loops  included  in  these  statements  (1320+2)  (127) 

clear  the  storage  location  KFR(I,J,K) 
which  indicates  whether  a  particular 
building  is  on  fire  or  not  for  each  of 
the  buildings. 


These  statements  clear  the  locations  which  (127+1)  (127+3) 

store  the  number  of  thermal  pulse  fires 
NUMTPF,  the  total  number  of  fires,  NTOTAL, 
and  the  number  of  buildings  which  have  had 
their  fire  spread  completed,  NCOUNT. 

These  statements  are  skipped  if  the  intermediate  (127+4)  (130+1) 

step  write-out  is  to  be  omitted.  These 
statements  write-out  the  heading  for  the 
intermediate  step  printout.  The  number  of 
lines  of  printout  on  the  page  is  set  to 
three. 
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The  block,  direction,  and  lot  numbers  are  (132)  (132+4) 

varied  for  each  building  to  see  if  it 
>'atr’  e  from  the  thermal  pulse. 

&  ud  '  is  generated.  If  the  proba-  (132  +  5)  (165+2  ) 

tv  y  of  building  ignition  from  thermal 
T  is  m  ^ater  than  the  newly  generated 

raraom  r.  .mber,  it  is  assumed  by  the  Monte 
Carlo  method  that  there  is  a  fire  by  ther¬ 
mal  pulse.  If  there  is  a  fire  from  the 
thermal  pulse,  the  storage  location  KFR(I,J,K) 
is  set  to  3.  If  the  building  is  one  of  par¬ 
ticular  interest,  i.e.  KR(I,J,K)  is  not  equal 
to  zero,  the  location  TPSP(I,J,K)  is  increased 
by  one  to  indicate  there  is  a  fire  from  the 
thermal  pulse.  Whether  or  not  the  building 
is  of  particular  interest,  NUMTPF  is  in¬ 
creased  by  one,  N TOTAL  is  increased  by  one, 
and  KBDG  (NUMTPF)  is  set  equal  to  the  order 
number  of  the  building  just  determined  to 
be  on  fire  from  the  thermal  pulse. 

Two  random  numbers  are  given  new  values.  After  (170)  (180) 

it  completes  all  this,  thare  is  a  return 
to  the  beginning  of  the  loop  where  the 
block,  lot,  and  direction  numbers  are 
varied  until  all  the  buildings  have  been 
considered  for  fire  from  the  thermal  pulse. 

These  statements  are  skipped  if  there  are  thermal  (180+1)  (190+1) 

pulse  fires.  If  there  are  no  fires  from 
the  thermal  pulse,  there  is  a  write-out 
which  indicates  there  are  none  and  a  jump 
to  the  end  of  the  loop  which  is  passed 
through  one  hundred  times. 

The  3  storage  locations  which  store  the  block,  (200)  (200+5) 

direction,  and  lot  numbers  of  the  build¬ 
ing  under  consideration  are  initially  set 
to  the  block,  direction,  and  lot  numbers 
of  the  first  building  which  was  determined 
to  be  on  fire  as  a  result  of  the  thermal 
pulse.  These  three  numbers  are  computed 
from  KBDG(l).  A  random  number  is  gener¬ 
ated  in  this  statement.  The  storage  lo¬ 
cation  which  keeps  a  running  total  of  the 
number  of  buildings  on  fire  from  spread, 

NUMSP,  is  set  to  zero. 
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This  is  the  beginning  of  the  ioop  which  is 
passed  through  as  many  times  as  there 
are  buildings  which  catch  on  fire  as 
a  result  of  thermal  pulse  and  passed 
through  partially  as  many  times  as 
there  are  buildings  which  catch  on  fire 
from  spread. 

The  storage  location  KSPREAD  in  this  state¬ 
ment  is  set  to  zero  and  does  not  vary 
until  the  spread  of  fire  from  buildings 
on  fire  from  thermal  pulse  has  been 
completed. 

If  the  intermediate  steps  are  not  to  be 
written  out,  these  statements  are 
skipped.  If  the  number  of  lines  on 
the  page  to  be  written  is  greater  than 
60,  a  new  page  is  begun  with  the  head¬ 
ings  written  out  and  the  number  of  lines 
per  page  set  to  three.  The  block,  direc¬ 
tion,  and  lot  numbers,  the  street  part  of 
the  address,  the  probability  of  building 
ignition  from  thermal  pulse,  four  random 
numbers  used  in  the  calculation,  and  the 
city  part  of  the  address  are  written  out. 
The  running  total  of  the  number  of  lines 
in  increased  by  four. 

This  loop  is  gone  through  16  times  or  at  least 
as  many  times  as  there  are  neighboring 
buildings  for  each  building  on  fire  to 
see  if  the  fire  spreads  to  other  neigh¬ 
boring  buildings. 

The  two  random  numbers  used  in  the  Monte  Carlo 
method  to  determine  if  the  fire  spreads, 
and  if  the  building  catches  on  fire,  are 
generated  in  these  statements. 

The  index  variable  is  tested  to  see  if  it  is 

less  than,  equal  to,  or  greater  than  two. 

If  the  index  variable  is  not  one,  these  state¬ 
ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  first  neighboring 
building  to  the  north. 


(200+6)  (200+6) 


(200+7)  (200+7) 


(200+8)  (230+1) 


(240) 

(240) 

(240+1) 

(250) 

(260) 

(260) 

(270) 

(270+2) 
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If  the  index  variable  is  r^t  two,  these  state-  (280) 
ments  are  skipped.  G  :.ieral  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  second  neighboring 
building  to  the  north. 

The  index  variable  is  tested  to  see  if  it  is  (290) 

less  than,  equal  to.  or  greater  than  4. 

If  the  index  variable  is  not  3,  these  state-  (300) 

ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  third  neighboring 
building  to  the  north. 

If  the  index  variable  is  not  four,  these  state-  (310) 
ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  fourth  neighboring 
building  to  the  north. 

The  index  variable  is  tested  to  see  if  it  is  (320) 

less  than,  equal  to,  or  greater  than  six. 

If  the  index  variable  is  not  five,  these  state-  (330) 

ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  first  neighboring 
building  to  the  east. 

If  the  index  variable  is  not  six,  these  state-  (340) 
ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  second  neighboring 
building  to  the  east. 

The  index  variable  is  tested  to  see  if  it  is  (350) 

less  than,  equal  to,  or  greater  than  8. 


(280+2  ) 


(290) 

(300+2) 


(310+2) 


(320) 

(330+2) 


(340+2) 


(350) 


If  the  index  variable  is  not  seven,  these  state-  (360)  (360+2) 

ments  ere  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  third  neighboring 
building  to  the  east. 
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If  the  index  variable  is  not  eight,  these  state-  (370) 
ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  fourth  neighboring 
building  to  the  east. 

The  index  variable  is  tested  to  see  if  it  is  (380) 

less  than,  equal  to,  or  greater  than  ten. 

If  the  index  variable  is  not  nine,  these  state-  390) 

ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  first  neighboring 
building  to  the  south. 

If  the  index  variable  is  not  ten,  these  state-  (400) 
ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  second  neighboring 
building  to  the  south. 

The  index  variable  is  tested  to  see  if  it  is  (410) 

less  than,  equal  to,  or  greater  than  12. 

If  the  index  variable  is  not  eleven,  these  state-  (420) 

ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  third  neighboring 
building  to  the  south. 

If  the  index  variable  is  not  twelve,  these  state-  (430) 
ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  fourth  neighboring 
building  to  the  south. 

The  index  variable  is  tested  to  see  if  it  is  (440) 

less  than,  equal  to,  or  greater  than  14. 


(370  +  2) 


(V  ,  > 

(390  +  2  ) 


(400+2) 


(410) 
(420+2 ) 


(430+2) 


(440) 


If  the  index  variable  is  not  13,  these  state-  (450)  (450+2) 

ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  first  neighboring 
building  to  the  west. 
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If  the  index  variable  is  not  14,  these  state-  (4bu) 

ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  second  neighboring 
building  to  the  west. 

The  index  variable  is  tested  to  see  if  it  is  15  (470) 

or  lb . 

If  the  index  variable  is  not  15,  these  state-  (480) 

ments  are  skipped.  General  terms  are  set 
equal  to  the  probability  of  spread  to  and 
the  order  number  of  the  third  neighboring 
building  to  the  west. 

If  the  index  variable  is  not  16,  these  state-  (490) 

ments  are  skipped.  A  general  term  is  set 
equal  to  the  probability  of  spread  to  the 
fourth  neighboring  building  to  the  west. 

If  the  storage  location  in  KFR  associated 
with  the  building  from  which  spread  is  con¬ 
sidered  is  not  3,  the  location  is  set  to  2 
to  indicate  the  spread  consideration  is 
complete.  Whether  or  not  KFR(I,J,K)  equals 
3,  a  general  erm  is  set  equal  to  the  order 
number  of  the  'ourth  neighboring  building 
to  the  we~t. 

Thxs  general  term  which  stores  an  order  number  is  (500) 
broken  down  into  block,  lot,  and  direction 
numbers . 


(4c  )  f  2  ) 


(470) 
(480+2  ) 


U95) 


(500+3 ) 


If  the  order  number  is  zero  which  implies  there  (500+4)  ( 500+  5  ) 

are  less  than  16  neighboring  buildings,  the 
spread  consideration  and  write-out  is  skipped. 

The  Monte  Carlo  method  is  used  to  see  if  fire  (510)  (510) 

spreads  to  the  neighboring  building  under 
consideration.  If  it  does  spread,  the 
probability  the  neighboring  building  will 
catch  on  fire  is  compared  to  another  ran¬ 
dom  number. 

The  probability  the  neighboring  building  will  (:  ?0)  (530  +  1  ) 

catch  on  fire  is  compared  to  a  random 
number.  If  the  probability  the  building 
catches  fire  is  not  greater  than  the  ran¬ 
dom  number,  the  statements  which  cause 
the  writing-out  of  the  buildings  which  are 
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on  file  are  skipped.  if  the  probability 
is  greater  than  the  random  number,  there 
is  a  test  to  see  if  the  neighboring  build¬ 
ing  already  caught  on  fire.  If  the  neigh¬ 
boring  building  had  already  caught  on  fire, 
statement  numbers  (535)  through  (5b0+l)  are 
skipped . 


The  storage  location  KFR  is  set  equal  to  "1".  (535  ) 

The  "1"  indicates  the  building  caught  on 
fire  from  spread,  but  its  spread  consid¬ 
eration  to  its  neighboring  buildings  is 
not  complete. 

If  the  building  is  of  particular  interest,  TPSP  (535+1) 
(I,  J,K)  is  increased  by  .001  to  indicate 
another  fire  from  spread. 

The  running  total  of  the  number  of  buildings  on  (536) 
fire  as  a  result  of  spread,  NUMSP,  is  in¬ 
creased  by  one.  The  running  total  of  the 
number  of  buildings  on  fire,  N TOTAL,  is 
increased  by  one. 

The  table  KBDG,  which  stores  the  order  number  of  (536  +  2  ) 
those  buildings  on  fire  has  entered  the 
order  number  of  the  building  which  was 
just  simulated  to  be  on  fire. 


If  the  details  are  not  to  be  printed  out,  there  (538) 
is  a  jump  to  statement  number  (610).  Other¬ 
wise  there  is  a  test  to  see  if  there  are 
more  than  60  lines  of  write-out  on  the  page. 

If  there  are,  headings  are  printed  out  on 
the  next  page,  and  the  number  of  lines  of 
write-out  is  set  to  3.  The  block,  lot  num¬ 
ber,  and  direction  number  of  the  building 
just  determined  to  be  on  fire  from  spread, 
as  well  as  its  address,  the  probability 
that  the  building  would  catch  on  fire,  the 
probability  of  building  ignition,  and  the 
probability  of  spread  from  the  building 
which  is  having  its  spread  determined  to  a 
neighboring  building  are  printed.  The  num¬ 
ber  of  lines  of  write-out.  is  increased  by 
four . 


MUMMER 

Through 

(  535) 

(535  +  2) 

(536  +  1  ) 

(536+2) 

(  560  +  ]  ) 
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If  the  index  variable  is  not  16,  there  is  a  (610)  (610) 

jump  to  statement  number  (630).  When 
this  variable  is  16,  it  indicates  that 
the  spread  from  the  building  to  its  neigh¬ 
boring  buildings  has  been  completed. 

The  running  total  of  the  number  of  buildings  (610+1)  (610+1) 

which  have  had  spread  consideration  com¬ 
pleted,  NCOUNT,  is  increased  by  one. 

If  the  running  total  number  of  buildings  on  (610+2)  (610+4) 

fire,  NTOTAL,  is  less  than  NCOUNT,  there 
is  a  jump  to  statement  number  (690). 

Otherwise  the  following  occurs:  the  build¬ 
ing  determined  to  be  on  fire  after  the  one 
which  has  just  had  its  spread  consideration 
completed  has  its  block,  direction,  and 
lot  numbers  determined  from  the  order  number. 


Two 

random  numbers  are  varied. 

(630) 

(630+1) 

This 

is  the  end  of  the  loop  which  considers 
spread  from  the  buildings  in  question 
its  neighboring  buildings. 

the 

to 

(640) 

(  b40  ) 

If  the  buildings  on  fire  from  thermal  pulse  have 
been  completed,  there  is  a  jump  to  state¬ 
ment  number  (670)  which  sets  the  index  vari- 

(650) 

(650+1 ) 

able  to  one.  Otherwise,  there  is  a  jump  to 
(660). 

The  index  variable  is  compared  to  the  number  (660)  (660) 

of  buildings  on  fire  as  a  result  of 
thermal  pulse.  If  the  number  of  build¬ 
ings  on  fire  from  thermal  pulse  is 
greater  than  the  index  variable,  there  is 
a  jump  to  statement  number  (680). 

If  the  number  of  buildings  on  fire  from  the  (670)  (670+1) 

thermal  pulse  is  less  than  or  equal  to 
the  index  variables,  KSPREAD  is  set  to 
one  to  indicate  that  the  spread  from 
the  buildings  on  fire  from  the  thermal 
pulse  has  been  completed.  There  is  a 
jump  to  the  beginning  of  the  loop  which 
considers  spread  to  the  neighboring  buildings, 

(Statement  Number  240). 
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This  is  the  end  of  the  loop  which  considers  the  (68u) 
spread  of  the  buildings  on  fire  fron  ther¬ 
mal  pulse.  When  the  buildings  on  fire 
from  thermal  pulse  have  had  their  spread 
considerations  completed,  the  index  vari¬ 
able  is  set  to  one  until  all  spread  con¬ 
siderations  are  complete. 

The  index  variable,  NN,  is  tested  to  see  if  it  (690) 
is  less  than,  equal  to,  or  greater  than  2. 

If  NN  =  1,  the  probability  of  exposed  room 
ignition  is  set  to  . L,  and  there  is  a  jump 
to  statement  number  (6835).  If  NN  =  2,  the 
probability  of  exposed  room  ignition  is  set  to 
.3,  and  there  is  also  a  jump  to  statement 
number  (6835). 


(680) 


(6810+1  ) 


There  is  a  test  to  see  if  NN  =  3,  4,  or  5.  II  (6815)  (6836) 

NN  =  3,  the  probability  of  exposed  room 
ignition  is  set  to  .5;  NN  -  4,  pionauility 
set  to  .7;  NN  =  5,  probability  s'*t  o  .  1 . 

After  the  probability  of  exposed  rr  om  ig¬ 
nition  has  been  set,  there  is  a  jump  to 
statement  number  (6835). 


There  is  a  test  to  see  if  the  index  variable,  (6835)  (6850) 

MM,  equals  one,  two,  or  three.  If  the 
variable  is  one,  the  angle  is  30  ;  if  2, 
the  angle  is  10°;  if  3,  the  angle  is  5  . 

After  the  angle  of  elevation  has  bc.t  , 
evaluated,  there  is  a  jump  to  statement 
number  (695). 


If  the  write-out  of  the  intermediate  steps  are  (695) 
to  be  skipped,  there  is  a  jump  to  state¬ 
ment  number  (705).  Otherwise,  the  angle 
of  elevation  and  the  probability  of  ex¬ 
posed  room  ignition  are  written  out  and 
there  is  a  jump  to  statement  number  (708). 

The  angle  of  elevation,  the  probability  of  ex-  (705) 
posed  room  ignition  and  the  index  variable 
JJ,  indicating  the  number  of  times  the  given 
simulation  with  the  angle  and  probability 
fixed  has  been  completed,  are  written  out. 


(  700  +  1  ) 


(706) 
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This  is  the  beginning  of  the  loop  which  varies  (708)  (708) 

the  block  number.  This  loop  causes  the 
write  out  of  the  summary  of  the  block, 
direction,  and  lot  numbers  of  the  build¬ 
ings  on  fire. 

This  is  the  beginning  of  the  loop  which  varies  (708+1)  (708+1) 

the  direction  number  so  all  buildings  will 
be  considered  in  the  summary. 

The  index  variables  set  in  statement  numbers  (708+2)  (710) 

(708)  and  (708+1)  determine  an  entry  in 
the  table  which  stores  the  number  of 
buildings  on  the  blockside.  If  the  table 
entry  is  zero,  there  is  a  jump  to  statement 
number  (785). 

If  the  number  of  buildings  on  the  blockside  is  (710)  (710) 

not  zero,  this  loop  is  not  skipped.  The 
lot  number  is  the  variable  index. 

If  the  location  KFR(I,J,K)  equals  3,  there  is  (710+1)  (710+2) 

a  jump  to  statement  number  (730).  Other¬ 
wise,  the  following  occurs:  if  the  inter¬ 
mediate  steps  are  not  to  be  written  out, 
there  is  a  jump  to  statement  number  (770). 

There  is  a  write-out  of  the  block,  direction  and  (715'  (720+1) 

lot  numbers  of  the  building  on  fire  from 
the  thermal  pulse.  There  is  a  jump  to 
statement  number  (770). 

If  the  building  is  not  on  fire  from  spread,  and  (730)  (730) 

the  spread  considerations  to  its  neighbor¬ 
ing  buildings  are  not  complete,  there  is 
a  jump  to  statement  number  (770). 

If  the  intermediate  details  are  not  to  be  (730+1)  (730+1) 

written  out,  there  is  a  jump  to  (770). 

The  block,  direction,  and  lot  numbers  of  the  (735)  (740) 

buildings  on  fire  from  spread  are  written 
out  only  if  the  intermediate  steps  are  to 
be  written  out. 

This  is  the  end  of  the  loop  which  has  the  lot  (770)  (770) 

number  varied. 
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STATEMENT  NUMBER 
From _ Through 


This  is  the  end  of  the  do  loop  which  varies  the  (785) 
direction  number  and  writes  out  the  summary. 

This  is  the  end  of  the  do  loop  which  varies  the  (790) 
block  number  and  writes  the  summary. 


The  number  of  lines  of  write-out  is  cleared.  If  (790+1) 
the  total  number  of  buildings  on  fire  is 
zero,  the  number  of  buildings  on  fire  from 
spread  is  cleared. 

The  number  of  buildings  on  fire  from  the  ther-  (801) 
mal  pulse  and  the  spread,  as  well  as  the 
total  number  of  buildings  on  fire,  are 
written  out. 

If  NDETAIL  equals  zero,  there  is  a  jump  to  (806) 

statement  number  (807). 

If  this  is  not  the  hundredth  time  through  the  (806+1) 

loop,  there  is  a  jump  to  statement  number 
(807) . 

This  is  the  beginning  of  the  loop  which  writes  (806+2) 
out  the  number  of  times  those  buildings 
of  particular  interest  catch  on  fire  from 
the  thermal  pulse  and  from  spread.  The 
index  variable  is  the  block  number. 

The  index  variable  for  this  loop  is  the  direc-  (806+3) 
tion  number. 

A  simple  term  is  set  equal  to  the  entry  in  the  (806+4) 
table  KC.  If  the  simple  term  is  zero, 
there  is  a  jump  to  statement  number  (807). 

Otherwise,  the  beginning  of  the  do  loop 
which  varies  the  lot  number  is  encountered. 


If  the  building  is  not  of  particular  interest,  (806+7) 
there  is  a  jump  to  statement  number  (807). 

An  integer  variable  is  set  equal  to  the 
floating  point  number  TPSP(I,J,K),  which 
stores  the  number  of  thermal  pulse  fires 
and  one  thousandth  of  the  number  of  spread 
fires,  so  that  the  number  of  fires  from  the 


(785) 

(790) 

(800+1) 

(805) 

(806) 
(806+1) 

(806+2) 

(806+3) 

(806+6) 

(8065+1 ) 
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STATEMENT  NUMBER 
From _ Through 


thermal  pulse  is  determined.  A  floating 
point  variable  is  set  equal  to  the  integer 
variable  so  arithmetic  operations  involv¬ 
ing  floating  point  variables  can  be  per¬ 
formed.  The  number  of  fires  from  spread 
is  o.ie  thousand  times  the  fractional  part 
of  the  variable  storing  both  thermal  pulse 
and  spread.  The  block,  lot,  and  direction 
numbers,  as  well  as  the  number  of  fires 
from  the  thermal  pulse  and  spread  are 
written  out.  The  variable  TPSP(I,J,K)  is 
cleared . 

This  is  the  end  of  the  loop  which  writes  out  (807) 

the  number  of  times  each  building  of 
particular  interest  catches  fire  from 
the  thermal  pulse  and  from  spread. 

This  is  the  end  of  the  loop  which  varies  the  (808) 

angle  of  elevation  and  the  probability  of 
exposed  room  ignition.  The  tape  being 
read  in  is  rewound  so  the  information 
concerning  another  combination  of  the 
angle  of  elevation  and  the  probability  of 
room  ignition  can  be  read  into  core. 

This  is  the  end  of  the  program.  (810) 


(807) 


(808) 


(810+1) 
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SECTION  4 
FIREFLY  3 


113 


I. 


INTRODUCTION 


FIREFLY  3  uses  as  input  the  output  tape  from  FIREFLY  2. 
FIREFLY  3  first  computes  the  average  of  the  number  of  build¬ 
ings  on  fire  from  spread  and  the  thermal  pulse,  as  well  as 
the  average  of  the  total  number  of  buildings  on  fire,  for 
each  one  hundred  case  test  base  where  the  angle  of  fireball 
elevation  and  the  probability  of  ignition  of  an  exposed  room 
are  fixed.  Next,  the  averages  just  computed  are  expressed  as 
a  percent  of  the  total  number  of  buildings.  Finally,  the 
standard  deviation  of  the  number  of  buildings  on  fire  from 
spread,  thermal  pulse  and  total  are  determined. 
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II. 


SUMMARY  OF  OUTPUT  DATA 


For  each  angle  of  fireball  elevation  and  probability  of 
ignition  of  an  exposed  room,  FIREFLY  3  contains: 


A.  The  average  number  and  percent  of  total  buildings 
destroyed  by  the  thermal  pulse. 

B.  The  average  number  and  percent  of  total  buildings 
destroyed  by  fire  spread. 

C.  The  average  number  and  percent  of  total  buildings 
destroyed  from  both  fire  spread  and  thermal  pulse. 

A  sample  of  this  output  is  shown  in  Table  1-2,  1-3,  and 
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III. 


DATA  DESCRIPTION 


The  data  needed  to  operate  FIREFLY  3  consist  of  two  card 
types.  All  values  are  right  justified. 


A.  Card  Type  1 — Records  to  Skip  (15  cards) 


Cols .  Description 

1-4  KSKIP ,  number  of  records  to  be  skipped  on 

the  input  tape  from  FIREFLY  2  before  each 
one  hundred  case  writeout  of  the  number 
of  the  building  on  fire  from  spread,  the 
thermal  pulse,  and  both  the  spread  and  the 
thermal  pulse  for  a  particular  angle  of 
elevation  and  probability  of  ignition  of 
an  exposed  room. 

KSKIP  must  be  defined  for  each  of  the  15 
cases  of  output  so  that  extraneous  page, 
column,  and  row  headings  are  not  errone¬ 
ously  read  as  data.  In  a  normal  operation, 
that  is,  when  no  special  building  analysis 
has  been  performed  by  defining  a  value  for 
NDETAIL,  the  first  KSKIP  card  contains  a  "7" 
in  column  4  followed  by  14  blank  cards. 


B.  Card  Type  2 — General  Information  (1  card) 


Cols . 

Description 

1-4 

Total  number  of  buildings 

6-15 

City  name  (Alphameric) 

17-28 

The  wind  speed  used  in  FIREFLY  l 
"8  mph,  east”). 
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IV. 


INPUT  TAPE 


During  execution,  FIREFLY  3  reads  the  output  tape  of 
FIREFLY  2.  KSKIP  plus  one  records  are  by-passed  until  the 
following  record  is  encountered : 

Cols .  Description 

52-55  Number  of  buildings  on  fire  from  the 

thermal  pulse. 

103-105  Number  of  buildings  on  fire  from  fire 
spread. 
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V.  DESCRIPTION  OF  PROCESSING  SEQUENCE 


STATEMENT  NUMBER 
From _ Through 


The  number  of  records  to  be  skipped  on  the  (0+1)  (15) 

input  tape  before  each  one  hundred  group 
is  read  into  the  table,  KSKIP. 

The  number  of  buildings,  the  city  name,  and  (15+1)  (20) 

the  wind  speed  are  read. 

The  above  three  items  and  a  heading  are  writ-  (20+1)  (25+2) 

ten  out.  The  location  storing  the  num¬ 
ber  of  lines  per  page  of  output  is  in¬ 
creased  by  seven. 

This  is  the  beginning  of  the  loop  which  varies  (25+2)  (25+2) 

the  combinations  of  the  angle  of  eleva¬ 
tion  and  the  probability  of  ignition  of 
an  exposed  room  so  that  the  averages,  per¬ 
centages,  and  standard  deviations  of  the 
number  of  buildings  on  fire  from  spread, 
thermal  pulse,  and  both  spread  and  thermal 
pulse  for  each  combination  can  be  performed. 

A  simple  variable  is  set  to  KSKIP.  If  the 
value  of  KSKIP  is  zero,  there  is  a  jump 
to  statement  (40)  so  only  one  record  is 
skipped  on  the  input  tape. 

This  loop  causes  one  record  to  be  skipped  for 
each  pass.  This  loop  is  gone  through 
KSKIP  times. 

The  sums  of  the  number  of  buildings  on  fire 
from  the  thermal  pulse  and  from  spread 
for  the  hundred  case  test  base  is  cleared. 

The  input  tape  from  FIREFLY  2  is  read  skipping 
all  but  the  number  of  buildings  on  fire 
from  spread  and  thermal  pulse  for  each 
pass.  The  sums  of  the  number  of  buildings 
on  fire  from  spread  and  the  thermal  pulse 
for  the  hundred  case  test  base  is  updated. 

This  loop  is  passed  through  one  hundred 
times. 


(25+3)  (25+4) 


(25+5)  (35) 


(40)  (40+1) 


(40+2)  (50) 
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STATEMENT  NUMBER 
From _ Through 


The  sum  of  the  total  number  of  buildings  on 
fire  for  the  hundred  case  test  base  is 
computed. 

The  average  number  of  buildings  on  fire  from 
the  thermal  pulse  is  computed  and  rounded 
to  the  nearest  intoger. 

The  average  number  of  buildings  on  fire  from 
spread  is  computed  and  rounded  to  the 
nearest  integer. 

The  average  total  number  of  buildings  on  fire 
is  calculated. 


(50+1)  (50+1) 

(50+2)  (55) 

(60)  (65) 

(70)  (70) 


The  percent  of  the  average  number  of  buildings 
on  fire  from  the  thermal  pulse  is  computed. 

This  percent  is  rounded  to  the  nearest 
integer. 

The  percent  of  the  average  number  of  buildings 
on  fire  from  spread  is  computed.  This 
percent  is  rounded  to  the  nearest  integer. 

The  percent  of  the  average  total  number  of 
buildings  on  fire  is  computed. 

The  sums  of  the  squares  of  the  absolute  values 
of  the  differences  between  the  average 
and  the  actual  number  of  buildings  on 
fire  from  spread  and  the  thermal  pulse 
are  cleared#  i.e.  KTOTSQSP  ■  0#  KT0TSQTP  *  0. 

This  loop  is  gone  through  one  hundred  times  to  (90+3)  (100) 

determine  the  squares  of  the  sums  of  the 
absolute  value  of  the  differences  between 
the  average  and  the  actual  number  of 
buildings  burning  from  spread  and  the 
thermal  pulse  for  a  particular  angle  of 
elevation  and  probability  of  exposed  room 
ignition. 

The  standard  deviations  of  the  number  of  build-  (100+1)  (100+3) 

ings  on  fire  from  fire  spread#  the  thermal 
pulse  and  both  spread  and  the  thermal  pulse 
are  calculated. 


(70+1)  (75) 

(80)  (85) 

(90)  (90) 

(90+1)  (90+2) 
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STATEMENT  NUMBER 
From  Through 


If  the  index  variable  M  (loop  beginning  in  (100+4)  (170) 

statement  number  (25+2))  is  less  than 
or  equal  to  five,  KELEV,  angle  of  ele¬ 
vation,  is  set  to  thirty.  If  M  is  greater 
than  five  but  less  than  eleven,  KELEV  is 
set  to  ten.  If  M  is  greater  than  or  equal 
to  eleven,  KELEV  is  set  to  five.  If  M 
equals  one,  six,  or  eleven,  the  probability 
of  exposed  room  ignition  equals. 1;  if  M 
equals  two,  seven,  or  twelve,  the  proba¬ 
bility  is  .3;  if  M  equals  thre^  eight,  or 
thirteen,  the  probability  is  .5;  if  M  equals 
four,  nine,  or  fourteen,  the  probability  is 
.7?  if  M  equals  five,  ten  or  fifteen,  the 
probability  is  .9. 

If  the  number  of  lines  of  output  on  the  page 
of  printout  is  greater  than  or  equal  to 
fifty-five,  the  title  line  is  printed  out 
at  the  top  of  a  new  page,  the  number  of 
lines  of  output  on  the  new  page  is  set 
to  seven  and  if  the  exposed  room  ignition 
probability  is  .1,  a  line  is  skipped,  and 
the  number  of  lines  of  output  is  updated. 

The  averages,  percents,  and  standard  deviations 
of  the  number  of  buildings  on  fire  from 
spread,  the  thermal  pulse,  and  both  are 
written  out  with  the  angle  of  elevation 
and  the  probability  of  ignition  of  an  ex¬ 
posed  room  specified. 

This  is  the  end  of  the  loop  beginning  at (25+2). 

Each  pass  through  this  loop  compiles  the 
information  for  a  particular  combination 
of  the  probability  of  ignition  of  an  ex¬ 
posed  room  and  the  angle  of  elevation. 

End  of  program. 


(175)  (183+1) 


(185)  (190+1) 


(200)  (200) 


(200+1)  (200+2) 
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I .  GENERAL  TERMS 


BLOCK--  A  block  is  a  rectangular  or  near  rec¬ 

tangular  area  containing  at  least  one 
building. 

BLOCKS  IDE —  A  blockside  is  one  of  four  sides  of  a 

block — north,  east,  south,  or  west. 

BUILDING  DESIGNATION— See  ORDER  NUMBER 

CARDINAL  DIRECTIONS—  North,  East,  South,  and  West 

LOT—  The  number  is  a  number  given  to 

each  building.  On  a  blockside  the 
lot  numbers  given  to  the  buildings 
are  values  from  one  and  incre¬ 
mented  by  one  to  a  maximum  of  ten. 

ORDER  NUMBER—  The  order  number,  which  uniquely  desig¬ 

nates  a  building,  is  defined  in  the 
following  equation: 

ORDER  NUMBER  ■  10001  +  100J  +  K 

Where :  I  *  block  number 

J  =  blockside  number 
K  “  lot  number 

SETBACK —  The  setback  is  the  distance  in  feet 

the  front  side  of  a  building  is  back 
from  the  street,  with  the  following 
exception:  if  the  distance  between 
the  front  of  the  building  across  the 
street  is  used  as  the  separation  dis¬ 
tance,  then  the  setback  is  zero.  If 
only  the  street  width  is  used  as  the 
separation  distance,  then  the  setback 
must  be  defined  so  that  the  total 
separation  distance  may  be  calculated. 
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THEORETICAL  SEPARATION  DISTANCE— Theoretical  separation  dis¬ 
tance  in  any  of  the  four  basic  direc¬ 
tions  from  a  particular  building  is 
the  maximum  distance  between  the  build¬ 
ing  and  another  building  where  the 
probability  of  spread  in  the  direction 
under  consideration  is  zero. 
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II 


FORTRAN  CONSTANTS  AND  VARIABLES 


GLOSSARY  OF  TERMS  USED  IN  COMPUTER  PROGRAM 
(COMPUTER  SYMBOLS) 

This  glossary  defines  the  terms  of  FIREFLY  1#  FIREFLY  2, 
and  FIREFLY  3  Which  are  in  common  storage.  All  the  terms  used 
in  the  subroutines  in  FIREFLY  1  are  also  used  in  the  main  pro¬ 
gram;  therefore,  there  are  no  definitions  specifically  for  the 
subroutines. 

Those  variables  which  are  not  an  array  name  have  a  "1"  as 
their  dimension. 
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SYMBOL 

DIMENSION 

MEANING 

ADR1-2(I,J,K) 

27,4,10 

Street  part  of  address  of  building 
on  block  I,  blockside  J,  and  lot  K 

ANG 

1 

Angle  of  the  wind  in  radians  mea¬ 
sured  from  east  counter-clockwise 

ARBLDG 

1 

General  term  for  one  of  the  radiat¬ 
ing  areas 

ARBLDG1 

1 

Radiating  area  from  the  north  of  the 
building 

ARBLDG 2 

1 

Radiating  area  from  the  east  of  the 
building 

ARBLDG 3 

1 

Radiating  area  from  the  south  of  the 
building 

ARBLDG4 

1 

Radiating  area  from  the  west  of  the 
building 

AVGSP 

1 

Floating  -»oint  variable  equal  to  the 
average  of  the  number  of  buildings 
on  fire  from  spread  in  a  hundred  case 
test  base. 

AVGTP 

1 

Floating  point  variable  equal  to  the 
average  of  the  number  of  buildings  on 
fire  from  the  thermal  pulse  in  a  hun¬ 
dred  case  test  base 

BIN 

1 

Gage-Babcock  Index 

CTY1 ,  CTY2 

1 

City  and  State 

D 

1 

Floating  point  variable  equivalent  to 

KD  (see  KD) 

DET 

1 

The  part  of  the  solution  of  the  qua¬ 
dratic  equation  to  solve  for  the  separa 
tion  distance  which  is  under  the  square 
root  operation 

DEVSP 

1 

Standard  deviation  of  the  number  of 

buildings  on  fire  from  spread 
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SYMBOL 

DIMENSION 

MEANING 

DEVTOT 

1 

Standard  deviation  of  the  total  num¬ 
ber  of  buildings  on  fire 

DEVTP 

1 

Standard  deviation  of  the  number  of 
buildings  on  fire  from  the  thermal 
pulse 

DM 

1 

Multiplier  for  building  characteris¬ 
tics  used  in  calculating  the  radiat¬ 
ing  area.  It  is  dependent  upon  the 
wall  openings,  number  of  stories  and 
type  of  roof  construction.  See  Section 
2  VII  E. 

DMPHR 

1 

General  term  for  one  of  the  wind  com¬ 
ponent's  number  of  miles/hour 

DMPHRE 

1 

Number  of  miles/hour  for  the  eastern 
component  of  the  wind  vector 

DMPHRN 

1 

Number  of  miles/hour  for  the  northern 
component 

DMPHRS 

1 

Number  of  miles/hour  for  the  southern 
component  of  the  wind  vector 

DMPHRW 

1 

Number  of  miles/hour  for  the  western 
wind  conponent 

EN 

1 

Probability  of  room  ignition  with  the 
environmental  factors  considered 

FC 

1 

Contribution  factor  adjusts  the  radiat¬ 
ing  area  of  the  side  of  a  building 
which  is  the  front.  The  contribution 
factor  is  dependent  upon  the  building 1 s 
setback  from  the  street . 

HF1 

1 

Flame  height  in  the  northern  part  of 
the  building 

HF2 

1 

Flame  height  in  the  eastern  part  of 

the  building 


HF3 


1 


Flame  height  in  the  southern  part  of 
the  building 
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SYMBOL 

DIMENSION 

MEANING 

HF4 

1 

Flame  height  in  the  western  part  ot 
the  building 

I 

1 

Block  number  of  building.  The  blocks 
must  be  numbered  from  one  and  incre¬ 
mented  by  one  with  a  maximum  of  27. 

J 

1 

The  side,  direction,  or  blockside  num¬ 
ber  of  building.  The  maximum  possible 
number  is  four.  With  each  block  all 
the  blocksides  need  not  contain  a  build¬ 
ing  or  buildings.  Blockside  1  means  the 
northern  part  of  the  block  while  block- 
side  2,  3,  or  4  means  eastern,  southern, 
or  western  part  respectively. 

K 

1 

Lot  number  of  building.  Each  blockside 
which  contains  a  building  or  buildings 
must  have  the  lots  numbered  from  one 
and  incremented  by  one  to  a  maximum  of 
ten. 

KARD1-4 

1 

To  check  to  see  cards  read  into  core 
in  correct  order 

KAVGSP 

1 

Fixed  point  variable  equal  to  AVGSP 
(see  AVGSP) 

KAVGTOT 

1 

Average  of  the  total  number  of  build¬ 
ings  on  fire 

KA  GTP 

1 

Fixed  point  variable  equal  to  AVGTP 
(see  AVGTP) 

KBDG 

1080 

Table  which  stores  the  order  numbers 
of  those  buildings  determined  to  be 
on  fire.  The  order  numbers  of  those 
buildings  on  fire  from  thermal  pulse 
appear  before  those  on  fire  from  spread. 

KBLK 

1 

Block  number  of  building 

KC  ( I ,  J ) 

27,4 

Number  of  buildings  on  the  blockside 

J  of  lot  I 

KCOUNT  ( I ,  J ) 

30,4 

Same  as  KC(I,J) 
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SAMPLE  DIMENSION 


MEANING 


KCR 

KD 

KDIFSP 


KDIFTP 


KDIR 

KELEV 

KF 

KFR(I,  J,K) 


1  Code  for  the  roof  construction  com¬ 

bustibility.  See  Section  2  VII  E 

1  Density  multiplier  times  one  hundred. 

This  will  usually  be  100. 


100  Absolute  value  of  the  difference  be¬ 

tween  the  average  of  the  number  of 
buildings  on  fire  from  spread  and  the 
actual  number  of  buildings  on  fire 
from  spread  for  one  of  the  hundred 
cases.  The  index  corresponds  to  the 
index  of  the  actual  number  of  build¬ 
ings  on  fire  from  spread. 

100  Absolute  value  of  the  difference  be¬ 

tween  the  average  of  the  number  of 
buildings  on  fire  from  the  thermal 
pulse  and  the  actual  number  of  build¬ 
ings  on  fire  from  the  thermal  pulse 
f or  :  one  of  the  hundred  cases.  The 
index  corresponds  to  the  index  of  the 
actual  number  of  buildings  on  fire 
from  the  thermal  pulse. 

1  Blockside  number  of  the  building  (see 

J) 

1  Angle  of  fireball  elevation 

1  Code  for  the  floor  construction  com¬ 

bustibility.  See  Section  2  VII  F 

27,4,10  Table  indicating  fire  and  spread  com¬ 
pletion  information  about  the  build¬ 
ing  determined  by  I,  J,  and  K.  If  the 
location  contains  a  "0",  this  indicates 
there  is  no  fire.  If  there  is  a  "1", 
the  fire  is  from  spread,  but  the  spread 
consideration  to  its  neighboring  build¬ 
ings  is  not  conplete.  If  the  building 
is  on  fire  from  spread  and  the  spread 
consideration  is  complete,  the  table 
entry  contains  a  "2".  A  building  on 
fire  from  the  thermal  pulse  is  indicated 
by  a  "3". 
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SYMBOL  DIMENSION 


MEANING 


KH 

1 

Term  dependent  upon  the  number  of 
stories  in  the  building.  KH  is  used 
in  the  calculation  of  the  Gage-Babcock 
index. 

KK 

1 

See  KC ( I , J ) 

KLOT 

1 

Lot  number  of  card  read  in.  See  K 

KO 

1 

Value  assigned  to  a  building  for  its 
use  which  determines  its  combustibil¬ 
ity.  See  Section  2  VII  F 

KOW 

1 

Value  assigned  for  the  relative  num¬ 
ber  of  wall  openings  which  determines 
combustibility.  If  there  are  no,  few, 
average,  many,  or  all  openings,  the 
value  is  one,  two,  three,  four  or  five 
respectively. 

KPAGNTN 

1 

Number  of  lines  of  printout  on  a  given 
page 

KPGNTN 

1 

See  KPAGNTN 

KPSP 

1 

Percent  of  the  average  number  of  build¬ 
ings  on  fire  from  spread 

KPTOT 

1 

Percent  of  the  average  number  of  total 
buildings  on  fire 

KPTP 

1 

Percent  of  the  average  number  of  build¬ 
ings  on  fire  from  the  thermal  pulse 

KR(I,J,K) 

27,4,10 

Table  which  stores  whether  or  not  the 
building  is  to  have  the  number  of  times 

it  catches  fire  from  thermal  pulse  and 
spread  computed  and  written  out,  i.e., 
whether  or  not  it  is  a  building  of  par¬ 
ticular  interest.  If  the  table  entry 
is  a  "1",  there  is  a  calculation  and 
printout;  whereas,  if  there  is  a  "0", 
there  is  no  calculation  or  printout. 
This  calculation  is  determined  for  a 
fixed  angle  of  elevation  and  exposed 
room  ignition  probability  (one  hun¬ 
dred  case' test  base). 
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DIMENSION 


MEANING 


KRR  1 

KSB  1 

KSEQ1  1 

KSEQ2  1 

KSKIP  15 


KSMSP  1 

KSMTOT  1 

KSMTP  1 

KSP  1 

KSPF  100 


Value  dependent  upon  the  roof  construc¬ 
tion  code.  It  is  used  in  determining 
the  Gage-Babcock  Index. 

Number  of  feet  the  building  is  set  back 
from  the  street.  See  setback  in  glossary 

Order  number  of  the  building  with  infor¬ 
mation  read  in  on  previous  card 

Order  number  of  the  building  with  infor¬ 
mation  read  in.  A  comparison  between 
KSEQ1  and  KSEQ2  is  perf  or  Tied  to  deter¬ 
mine  if  the  input  cards  are  in  the 
correct  order. 

Number  of  records  to  be  skipped  on  output 
tape  from  FIREFLY  2  before  the  one  hun¬ 
dred  case  output  of  the  number  of  build¬ 
ings  on  fire  from  spread  and  thermal  pulse 
is  encountered.  The  index  equals  the  num¬ 
ber  of  one  hundred  cases  which  have  been 
encountered  plus  one. 

Running  total  of  the  number  of  buildings 
on  fire  from  spread  in  a  particular  test 
base 

The  total  number  of  buildings  on  fire  in 
a  particular  test  base 

Running  total  of  the  number  of  buildings 
on  fire  from  the  thermal  pulse  in  a  par¬ 
ticular  test  base 

Number  of  times  a  building  catches  on 
fire  from  spread  with  the  angle  of 
fireball  elevation  and  the  exposed 
room  ignition  probability  fixed 

Number  of  buildings  on  fire  from  spread 
for  each  case  of  the  one  hundred  under 
consideration.  The  number  of  buildings 
on  fire  from  spread  for  the  first  time 
through  the  loop  is  stored  in  KSPF  ( 1 ) . 

The  index  of  KSPF  corresponds  to  the  num¬ 
ber  of  times  the  problem  has  been  simu¬ 
lated  with  a  particular  angle  of  eleva¬ 
tion  and  probability  of  ignition  of  an 
exposed  room. 


zi¬ 


SYMBOL 

DIMENSION 

MEANING 

KSPREAD 

1 

Indicates  whether  or  not  the  spread 
considerations  for  those  buildings  on 
fire  from  the  thermal  pulse  have  been 
completed.  A  "0"  indicates  that  the 
spread  consideration  is  not  complete, 
while  a  "1 "  indicates  those  buildings 
on  fire  from  the  thermal  pulse  have 
had  their  spread  considerations  com¬ 
pleted. 

KSQSP 

100 

Square  of  KDIFSP  with  the  indices 
corresponding 

KSQTP 

100 

Square  of  KDIFTP  with  the  indices 
corresponding 

KSTY 

1 

Number  of  stories  a  building  has 

KTOTSQSP 

1 

Running  total  of  KSQSP  for  the  hun¬ 
dred  cases 

KTOTSQTP 

1 

Running  total  of  KSQTP  for  the  hun¬ 
dred  cases 

KTP 

1 

Number  of  times  a  building  catches  on 
fire  from  the  thermal  pulse  with  the 
angle  of  fireball  elevation  and  the 
exposed  room  ignition  probability 
fixed  . 

KTPF 

100 

Number  of  buildings  on  fire  from  the 

ther  mal  pulse  for  each  case  of  the  one 
hundred  under  consideration.  The  num¬ 
ber  of  buildings  on  fire  from  the  ther¬ 
mal  pulse  for  the  first  time  through  the 
loop  is  stored  in  KTPF(l).  The  index 
of  KTPF  corresponds  to  the  number  of 
times  the  problem  has  been  simulated 
with  a  particular  angle  of  elevation 
and  probability  of  ignition  of  an  ex¬ 
posed  room. 

KV  1  General  term  for  the  classification  of 

one  of  the  four  wind  components  as  a 
light,  moderate,  or  high  wind.  A  com¬ 
ponent  less  than  8  miles/hour  is  a  low 
wind  and  indicated  by  a  "1"  in  the  lo¬ 
cation  KV.  A  medium  wind  from  8  to  16 
miles/hour  is  indicated  by  a  "2" 
in  KV.  A  "3"  in  KV  indicates  there  is 
a  high  wind,  a  wind  16  miles/hour  or  above. 
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SYMBOL 


DIMENSION 


MEANING 


KVE 

KVN 

KVS 

KVW 

KW 


1 


1 


1 


1 


1 


KWE1-4  1 


KWIDTH1-2  1 


KWN1-4  1 


Classification  of  the  eastern  wind 
component  as  a  light,  medium,  or 
high  wind.  See  KV 

Classification  of  the  northern  wind 
component  as  a  light,  medium,  or  high 
wind.  See  KV 

Classification  of  the  southern  wind 
component  as  a  light,  medium,  or  high 
wind.  See  KV 

Classification  of  the  western  wind 
component  as  a  light,  medium,  or  high 
wind.  See  KV 

General  term  for  the  distance  in  fe^t 
between  the  building  and  one  of  its 
neighboring  buildings.  If  the  neigh¬ 
boring  building  is  opposite  its  front 
side,  the  street  width  may  be  recorded 
as  the  width  if  the  setback  distance 
is  recorded. 

Distance  in  feet  between  the  building 
and  one  of  its  neighboring  buildings 
to  the  east.  If  there  is  no  neighbor¬ 
ing  building,  distance=0.  The  "1",  "2", 
''3”,  and  "4"  indicate  the  distance  between 
the  building  and  the  first,  second,  third, 
and  fourth  buildings  respectively  to  the 
east.  See  KW 

Width  in  feet  of  the  building.  The 
east-west  length  of  the  building  is 
stored  in  KWIDTH  1.  The  north-south 
length  is  stored  in  KWIDTH  2. 

Distance  in  feet  between  the  building 
and  one  of  its  neighboring  buildings 
to  the  north.  If  there  is  no  neigh¬ 
boring  building,  distance  =  0.  The 
"1”,  "2",  "3",  and  "4"  indicate  the 
distance  between  the  building  and  the 
first,  second,  third,  and  fourth 
buildings  respectively.  See  KW 
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SYMBOL 


DIMENSION 


MEANING 


KWRITE 

KWSl-4 

KWW1-4 

M 

MAJDIR 

N 

NBE1-4 ( I 

NBLDG 


1  Indicates  whether  or  not  the  intermedi¬ 

ate  steps  are  to  be  written  out.  If 
KWRITE*=0,  there  is  no  intermediate  step 
printout.  If  KWRITE=1,  there  is  the 
write-out  of  the  intermediate  steps. 

1  Distance  in  feet  between  the  building 

and  one  of  its  neighboring  buildings 
to  the  south.  If  there  is  no  neigh¬ 
boring  building,  distanced.  The  "1", 
"2",  "3",  and  "4"  indicate  the  distance 
between  the  building  and  the  first, 
second,  third,  and  fourth  neighboring 
buildings  respectively.  See  KW 

1  Distance  in  feet  between  the  building 

and  one  of  its  neighboring  buildings 
to  the  west.  If  th  re  is  no  neighbor¬ 
ing  building,  distanced .  The  "1", 

"2",  "3",  and  "4"  indicate  the  distance 
between  the  building  and  the  first, 
second,  third,  arid  fourth  neighboring 
buildings  respectively.  See  KW 

1  Total  number  of  blocks.  M  is  also  the 

maximum  block  number  since  M  is  from 
one  and  incremented  by  one. 

1  Code  for  the  wind  component  which  has 

the  largest  number  of  miles/hour. 

North,  east,  south,  and  west  are  re¬ 
presented  by  "1M,  "2",  "3M,  and  "4" 
respectively, 

1  Total  number  of  buildings  in  the  area 

to  have  buildings  on  fire  considered 

J,K)  27,4,10  Order  numbers  of  the  neighboring  build¬ 

ings  to  the  east.  See  NBLDG 

1  General  term  for  the  order  number  of  a 

neighboring  building.  For  NBE1-4, 
NBN1-4,  NBS1-4 ,  and  NBW1-4  the  "1", 

"2",  "3",  and  "4"  indicate  the  first, 
second,  third,  and  fourth  neighboring 
buildings  respectively. 
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SYMBOL 


DIMENSION 


MEANING 


NBLK 

1 

Block  number  of  building.  It  is  used 
to  store  the  block  number  read  in  on 
the  first  card  of  the  block  informa¬ 
tion  so  it  can  be  compared  to  the 
block  number  of  the  second  card. 

NBN1-4  ( I,  J,  K ) 

27,4,10 

Order  numbers  of  the  neighboring 
buildings  to  the  north  See  NBLDG 

NBS1-4(I, J,K) 

27,4,10 

Order  numbers  of  the  neighboring 
buildings  to  the  south.  See  NBLDG 

NBWl-4 ( I , J,K) 

27,4,10 

Order  numbers  of  the  neighboring 
buildings  to  the  west.  See  NBLDG 

NCNT 

1 

NCOUNT  +1  (see  NCOUNT) 

NCOUNT 

1 

Number  of  buildings  on  fire  which  have 
had  their  spread  considerations  com¬ 
pleted 

NDETAIL 

1 

Number  of  buildings  which  are  of  par¬ 
ticular  interest 

NDIR 

1 

Blocks ide  number  of  building.  It  is 
used  to  store  the  blocks ide  number  of 
the  first  card  of  the  building  infor¬ 
mation  so  it  can  be  compared  to  block- 
side  number  of  the  second  card. 

NLOT 

1 

Lot  number  of  building.  It  is  used  to 
compare  the  lot  numbers  of  the  first 
and  second  card  of  the  building  infor¬ 
mation. 

NTH 

1 

Order  number  of  building  minus  the  block 
number  times  one  thousand 

NTOTAL 

1 

Total  number  of  buildings  which  are  known 
to  have  caught  on  fire 

NUME 

1 

Number  of  neighboring  buildings  to  the 
east  of  the  building 

NUMN 

1 

Number  of  neighboring  buildings  to  the 
north 

SYMBOL 


DIMENSION 


MEANING 


NUMS 

NUMSP 

NUMTPF 

NUMW 

PR 

PRB(I, J,K) 
PRE1-4 ( I, J 

PRF(I, J,K) 
PRN1-4 ( I ,  J 

PROB 

PRSl-4 (I, J 


1 

1 

1 

1 

1 


27,4,10 
K)  27,4,10 


27,4,10 
K)  27,4,10 


1 

K)  27,4,10 


Number  of  neighboring  buildings  to 
the  south 

Number  of  buildings  on  fire  from 
spread 

Number  of  buildings  on  fire  from  the 
thermal  pulse 

Number  of  neighboring  buildings  to 
the  west 

General  term  for  a  probability  of 
spread  to  one  of  the  neighboring 
buildings.  For  PREl-4,  PRN1-4, 

PRSl-4,  and  PRW1-4,  the  "1",  "2", 

"3",  and  "4"  indicate  the  probabil¬ 
ity  of  spread  to  the  first,  second, 
third,  or  fourth  neighboring  build¬ 
ing  respectively  in  the  direction 
under  consideration. 

Probability  of  building  ignition 
from  thermal  pulse 

Probability  of  spread  to  the  first, 
second,  third,  or  fourth  neighboring 
building  (see  PR)  to  the  east  of 
the  building 

Probability  of  the  building  defined 
by  I,  J,  and  K  to  catch  on  fire 

Probability  of  fire  spread  to  the  first, 
second,  third,  or  fourth  neighboring 
building  (see  PR)  to  the  north  of  the 
building 

Probability  of  building  ignition  from 
thermal  pulse 

Probability  of  fire  spread  to  the  first, 
second,  third,  or  fourth  neighboring 
building  (see  PR)  to  the  south  of  the 
building 


SYMBOL 

PRWl-4 ( I ,  J,  K ) 

PSP 

PTP 

Q 

RANDOM1-2 

RANDOM4-5 

RI 

RII 

RKTP 

RN 

RNN 

S 

51 

52 

53 


MEANING 


Probability  of  fire  spread  to  the  first, 
second,  third,  or  fourth  neighboring 
building  (see  PR)  to  the  west  of  the 
building 

Floating  point  variable  equal  to  KPSP 
(see  KPSP) 

Floating  point  variable  equal  to  KPTP 
(see  KPTP) 

Intermediate  value  used  in  computing 
the  Gage-Babcock  Index 

Used  to  generate  RAND0M4  and  RAND0M5 

Used  in  the  Monte  Carlo  method  to  deter¬ 
mine  if  the  building  catches  on  fire 
from  the  thermal  pulse,  if  the  fire  is 
going  to  spread  to  within  reach  of  a 
neighboring  building,  and  if  this  neigh¬ 
boring  building  will  catch  on  fire 

Exposed  room  ignition  probability 

See  RI 

Floating  point  variable  set  equal  to 
KTP  (see  KTP) 

Floating  point  variable  set  equal  to  N 
(see  N) 

Floating  point  number  set  equal  to  the 
exposed  room  ignition  probability 

General  term  for  the  shape  of  the  ra¬ 
diator 

Northern  radiator  shape  of  the  building 

Eastern  radiator  shape  of  the  building 

Southern  shape  of  the  radiator  of  the 
building 
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SYMBOL 


DIMENSION 


MEANING 


S4  1 

SHIELD  1 

STY  1 

T  1 

TPSP(I, J,K)  27,4,10 


WB1-2  1 

WE  1-4  1 

WINDl-2  1 

WMF  4 


WN1-4  1 

WS1-4  1 


Western  shape  of  the  radiator  of  the 
building 

Shielding  factor  dependent  upon  the 
elevation  of  the  fireball  angle  and 
the  number  of  stories  of  the  building 
in  question 

Floating  point  variable  storing  the 
number  of  stories 

The  value  assigned  to  building  A  de¬ 
pending  upon  the  angle  of  inclination 
of  the  terrain.  See  Section  2  VII  F 

Number  of  times  the  building  of  par¬ 
ticular  interest  defined  by  I,  J,  and 
K  catches  fire  from  the  thermal  pulse 
is  stored  in  the  integer  part  of  the 
floating  point  number.  The  number  of 
times  the  building  of  particular  in¬ 
terest  catches  on  fire  from  spread  is 
the  fractional  part  times  one  thousand. 
These  two  numbers  are  totaled  for  a 
fixed  angle  of  elevation  and  exposed 
room  ignition  probability. 

Floating  point  variables  WBl  for  KWIDTH1 
and  WB2  for  KWIDTH2 

Floating  point  variables  WEI  for  KWEl, 
WE2  for  KWE2,  WE 3  for  KWE3,  and  WE 4  for 
KWE4 

BCD  description  of  wind,  i.e.  LOW, 
MEDIUM,  or  HIGH  WIND 

Radiating  areas  of  a  building.  The 
subscript  1  indicates  the  northern 
radiating  area,  2  the  eastern  area, 

3  the  southern  area,  and  4  the  west¬ 
ern  area 

Floating  point  variables  WN1  for  KWN1, 
WN2  for  KWN2,  WN3  for  KWN3,  and  WN4 
for  KWN4 

Floating  point  variables  WSl  for  KWS1, 
WS2  for  KWS2,  WS3  for  KWS3,  and  WS4  for 
KWS4 


I 

I 


1  T7 


SYMBOL 


DIMENSION 


MEANING 


WWl-4 

1 

Floating  point  variables  wwl  for  KWWlr 
WW2  for  KWW2,  WW3  for  KWW3 ,  and  WW4 
for  KWW4 

X 

1 

Term  using  r “ratio  of  the  distance  be¬ 
tween  two  buildings  to  the  theoretical 
separation  distance.  The  equation 
follows:  x*l-r 

Y 

1 

Theoretical  separation  distance  in 
any  of  the  four  basic  directions 
from  a  particular  building 

YE 

1 

Eastern  theoretical  separation  dis¬ 
tance  from  the  building  in  question 

YN 

1 

Northern  theoretical  separation  dis¬ 
tance 

YS 

1 

Southern  theoretical  separation  dis¬ 
tance 

YW 

1 

Western  theoretical  separation  dis¬ 
tance 

YY 

1 

KTOTSQTP  divided  by  one  hundred 

YZ 

1 

YY  +  ZZ 

ZZ 

1 

KTOTSQSP  divided  by  one  hundred 

SECTION  6 


PROGRAM 
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0  3/2S/6d 


1  '■>  «,  K  IncfL  Yl 

■;•••,-'  Si  JN  PRF(30,4,  X U  > #HnF  (  4  ) ,  KCOU.M  T  (40,  4  ), 

,  4,n)  ,  r'rc\2(3n,<,10)»PRN3<3  0,4,10  >  ,R«N4(30,4,10>  , 

:  1  (>>:.,  4,10  ,  P*F2(30»4»10),PRE3(30 »  4,1U  )  ,  RRt  4  (  40 , 4 , 10  >  , 

*  ^niSi  (43,4,10)  ,  'Jf<$2(30,A,lO),PHS3(3n,4,lL  )  ,  RRS4  (  30  *  4 , 10 )  , 

<4C,  4,10)  ,  PkU2<  3  0,4, 10),  PRW3<  30,4, 10  >  ,PRW4  (30,4,10) 

GO”  0\/rju/»MF,  PWF,  K  COUNT  ,  PRNl  ,  PrtN2,RRN3, 

'  4/ol/PKtl#PPfc2,P«E3,P)R£4,PKSl,PHS2,PKS3,PKS4,PKWl(f»Rig^#PRw3, 

R;\r\  ,  (0  )  ,  /HO/,  w  JTrt,  KV  CQNS,PERP,(1  >  ,/Bl/  ,  FIRE  2,  AGNT 

;; -  TGT„L  NuMaER  UK  BLDGS  WITH  LOT  INFORMATION  *  N 

RfcA  J  1>  <  N . . _ . ... 

C -  TOTAL  NUMBER  OF  BLOCKS  a  M 

READ  . . 5#M _ 

5  FORMAT  (  1m  ,14) 

4E4D  1 ,  D  MPHR ,  A  \G  _  _ _ 

1  FOR  m  A  1  (F3,1,1X,F4,2) 

<SfcUl*Q  _ 

KPAGNTNsl 
00  21  M M  s  1 ,  M 

21  READ  '  .  22,  ( KCOUNT  ( MM,~J  )Vj*lY  4  ) 

22  FORMAT  <6X,  12, IX,  I2,1X,I2,1X,I2J_  _ 

no  .571  I  1=1, M 

READ  10,KBLK,KDIRiKLOT,  K  w  J  DT  HI ,  *  W  I  DIR*  ,  KSTY  »  KSB,  K 

inR,*CR,NUMN,KWNl,KWN2,KWN3,KWN4»NLIME,KWfc  1 ,  Kwfc  2 ,  <Re3,  KWF4 ,  NUMS  , 

2KARU1 

10  format  (  I2ilX,' 'll, IX,  12, 3X,  .  I3,1X,U,  I  2 ,  IX  ,  1 3,  IX  ,  1 1,  IX  ,  1 1 , 

11X,11X,  II, IX,  1 3,  IX,  13,  IX,  13,  IX,  1 3,  IX,  II, IX,  I  3, IX,  I  3, 

11X,  13,  IX,  13,  IX,  U,  3X.  ID 

IF  (KAWDl.NE,  1  )_GO  1.0.14 _ _ 

mblk=kblk 

NDIHaKDIH _ _  ..  _ _ 

\'LOT  =  KLOT 

_ READ  _  23,KBLK,KDIR,KLOT,KWSl»KKi>2,<RS3,KWS4,NUMw, 

1 K W w  l ,  K w  a  2  ,’K WW  3  I  KWW 4  ,  KO,K  W  ,  K F  ,  K D ,  T  ,  D M ,  K  A K  D 2 

23  FORMAT  <  12,  IX  ,  11,  IX,  12,  IX,  13,  IX,  1 3,  IX,  1 3,  IX,  I  3,  IX,  II,  IX,  1 3,  IX,  13, 
11X,  I  3 ,1 X  ,  1 3 , 2 X,1 2,1  X ,  1 2,  1X~,  127 IX,  I  3 ,YX,>  3 , 1,  IX,  F5 . 1 ,14 X  ,  ID 

KD  =  1 0  0 
WBlsKRlUTHl 
WB2  =  KrflDTH2 

STYsKSTY  .  ”  . . . 

IF  (KARD2.NE.2)  GO  TO  14 

C - CHECKING  TO  SEE  IF  RECORDS  JN  ORDER 

IF  (KLOT.NE.NLOT)  GO  TO  14 
IF  (KJIR.NE.NDIR)  GO'TO~14 
IF  (KBLK.NE.NBLK)  GO  TO  14 
DO  3710  MM*1, 3  '  '  '  -  '  '  ' 

DO  3710  NN*1 ,9,2 

c - "  ?R0R  =  PRU3  ,  OF  building  jgnit  ION*  FROM  THERMAL  PUlSc 

C - ROOM  IGNITION  PROB* R 1 1 _ _ 

RNNsNiM  .  '  . - 

P I  I *RNN* , 1 

'EN=  ,  0333*  STY*(WR1^WB2) 

IF  (MM-2)  2790,2860,2930  __  _ 

C-*-- 

C— --  ANGLE  OF  ELEVATION.*  30  DEGREES _ 


141 


non 


:\3,< 


2  79" 

IF 

(KSTY-14) 

2 -■'10, 2600, 26  uO 

2 --'CO 

SHltL  J=,94 

G  C 

T  0  r'lOl, 

2  a  1  * 

:  r 

(  *  a  T  Y  -  1  2  ) 

2-13,2612,2611 

—  •  *  i.  *. 

Shi 

|::L  0  =  ,  So 

•  *  o 

'0  ?a*  u 

2*1? 

S'iIcLD=lH3 

GO 

TO  2a3  0 

IF 

( i\sTY«iO  ) 

2616,2615,2814 

2"i4  SnIrLJs.77 
GO  TO  *030 
2015  ShIcLD=,7Q 

GO  TO  28  5  0  _  ....  .... _ 

2616  IF  IKSTY-d)  2619,2018,2817 

2017  SHlrL0=,63  .  . 

GO  TO  2a5G 

2816  SHlcLUs|5p  _ 

GO  TO  265  0 

2819  IF  (KSTY-o).  2622, 2«21,2820 _ 

2620  SH!t:L0:,48 

GO  TO  2850  _  .  .  _ 

2o2i  SHlcLD  =  ,42 

GO  T  0  265  0  . . .  . . 

262?  IF  (  KSTY-4  )  2825,2824,2823 

-  2523  SH  I  LL0s  »  3  7 _ 

GO  TO  2850 

.  .2824  SH 1 1 LDS  ,  3  0  _  _ _ 

GO  TO  265  0 

2025  IF  (KSTY-2L2828, 2827^826 _ 

2526  SH  I  b  LD=  ,  24 

_  .  _  GO  TO  265  0 _ 

2027  SH  I  e  1.0s  ,  2  0 

GO  TO  265  0  _ _ 

2628  SHIcLD=,lt> 

.  2550  P  =  HI  I -SH  I  CtD  _ _ 

KELEV  =  30 

..GO  T0..24 _ 

m  •  •  • 

-  ANPLr  of  ELEy.AT.ION  =10.  D6GREIS 

2860  IF  t  KSTY-14)  _2A7J.,28  7J,.28Z_0 _ 

2070  SHIELDS. 62 

_  .  GO  TO  2920  _ _  • .  . 

2871  IF  (KSTY-12)  2  8  74,28  73,28  72 

_ 2572  SHlELD=  ,  69 _ 

GO  TO  2920 

_ 2373  SHILLD=.  56_._  _ 

GO  TO  2920 

_.  .2*74  .IF  (KSTY-10J_2.67.Z, 2876, 287.5 _ 

2675  SHlcLDs,45 

_  .GO  TO  29  2  0 _ 

2676  SHIELDS, 28 

GO  TO  2920 _  _ _ _ 

2677  IF  (KSTY-6)  2680,2879,2878 

.  _  2378  SHIELD*. 12 _ 
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go  r o  2 •; 2 j 

2  •'  7  9 

S  H  I  r  1.  J  *  ,11 

GO  K)  2v2u 

2 c  0 

IF  USTY-5)  20"3,  2802, 

?881 

2  6  31 

Sm  I  tL  D  =  ,10 

GO  IG  2  920 

2  6  82 

ShIcLD*  ,08 

GO  TO  2920 

2*63 

IF  (KalY-2)  *6,2885, 

2684 

2  604 

ShIcLD*  ,03 

GO  TO  2920 

2*65 

SHleLiJa,0*t 

GO  TO  2920 

2606 

S  H  I E 1.  D  *  ,03 

2920 

P  =  WI  I  *ShIcLD 

*ELbV  =  10 

GO  TO  24 

.... 

ANGLE  OF  tLEVAT I  ON  =5 

degrees 

2930 

IF  (KSTY-14  )  2932,2931 

,2931"'" 

2931 

SHltuL)  =  ,73 

GO  TO  2990 

293? 

IF  (Kb»TY*l2  >  2935,2934 

,2933  .. 

2933 

SHlbLDs, 62 

GO  TO  2990 

2934 

SHIbli)=, 50 

GO  TO  2990 

2935 

IF  USTY-lO  )  2938,2937 

,2936 

2  936 

S  H  [  e  L  O  *  ,  3  5 

GO  10  2990 

2937.. 

SHlfcLOs,2U 

GO  TO  2990 

2933  IF  (KSTY-d)  2941 ,  294  0  ,  2939 

2939  SH I cL U=  1 12 
GO  TO  2990 

2940  SHIELD'*, 10 
GO  TO  2990 

'2941  IF""(KSTY-5>  2'944T2'94'3  729*42 

2942  SHIELD*, 10 
GO'TO  2990' 

2943  SHIELD* ,  06 
GO'TO  2990 

2944_SHIELD  =  ,03 _ _ 

2990  PsRI  I  *ShIELD 

KbLcV  =  5  _  _ _ 

24  IF  ('mm','E071>  GO  TO  3706"" 

GO  TO  370  __  _  _ _  __ 

"3706  IF  (  NiMibO,  1  j  GO  TO  "3718 

_G0  TO  370  .  _ _ 

3716  KSSJ2=KdLK *  1  0  0  0  ♦KOI R*10Q*KtQT 

_ I F  (  K  SEQ2- K SFQ1 >  14,25,25  _ 

14  WRITE  (6# 2  0  ) 

20  FORMAT  (1HO,40HTH6R6  JS  AN_6RROK  IN  -SEQUENCING  OF  UPUT) 
GO  TO  545 

..25  KSE(J1«KSEQ2 _ _  _ _ . 
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'.\  y  .4 


:3 

25 

4  7 


32 


34 

36 


I  8  K 
J*K 

n 

IF 

It 

•.WJ* 

HP.p 

Dpo 

skp 

go 

oxp 


•'*1* 

i.lH 

(II. 

(  r  Sti 

(  a  \;i.; 
^  ^  c  = 

Pi  r>  i  - 

~KS  = 

M  hl  rt  • 

TO  1 
PI  P\  ■'J  s 
n  R  c  - 


.\lt,l>  GO  TO  15 
.  EQ.G)  n(J  TO  47 

-1.57)  30.32,34 

JMphR 

J 

0  _ 

-nMPHH£ 

5 

ijXpHR 


*•1 

43 


44 

45 

C  — -- 
C-*-- 

30 


Cr..-.-- 

36 


c--.-- 

42 


C— 

46 


15 

—  18 


nMPnRSs-DMPHMN 

DMPhPwsfl  .  ..  _ _ _ .  . 

GO  TO  15 

IF  (  A  N  (5  -  3  1 1 4  )  36,38*41 _ _ _  ..  . 

DMPn«4sr)MPHR 

DM°nRN*  0  _ 

OMPhftt=-DMPHRW 

DMPrtRSs0  ...  _ _ _ _  _  _ _ _ _ —  .. 

GO  TO  15 

IF  (AMG-4.71J  J  2  *  4  3  *  4.4 _ _ _  . 

HMPhRS=DMPHR 

OMPriRiM=-DMPHRS _ _ _  .. 

DMPnR6«0 

.  DMPnRKsD  _ _ _ 

GO  TO  15 

IF  (AiMG-6.28)  46,48*48 _ .. 

A.\G  =  6,2d-ANG 

.GO  TO  28  _ _ _ _ _ 

CONVERTS  VECTOR  INTO  NORTH,  EAST  SOUTH,  AND  WEST  COMPONENTS 

.BREAKS  MPriR.-V  EG  TOR  I NTO  NORTH  AND.  EAST  COMPONENTS _ 

DMPrtRfc  =  COS(  ANG  )*DMPHR 

_DKPnRNsS  1  N(  ANG  LtDMRttR _ 

DMPhRSs-DMPHRN 

-DMPnSWs-DMP.HRE _ _  .. 

GO  TO  15 

3REAKS  MPHR  .VECTOR  .INTO  NORTH  AND  WEST  COMPONENTS _ 

DM?hRwsC0S(3,14-ANG)*DMPHR 

_DMPnRiNsSlN(3,14iAMQl*MgilH _ _ _ 

DMPhREs-DMPHRW 

.JMPhRS«-DMPHRN _ 

GO  TO  15 

DMPHRW=COS( ANG*3,14)*DMPHR*  *  ~ 

_0MP r»R S  =  S  I  N  ( A N G - 1. 1.4 LtflMPJW _ _ 

DMPhRNs-DMPHRS 

_dmphre=-dmp.h.rw _ _ _  _  . 

GO  TO  15 

.BREAKS  MPhR  VECTOR  INTO  S0UXK_.4iHL-EAST._C O.MP ON E.N T § _ 

DMPhRcsC0S(6,28-ANG)*DMPHR 

DMPnRS  =  SlN<6,28-.ANG.)*J).MPHB _ _  ... 

dmphrn«-dmphrs 

;DMPHRW*-DMPHRE  _ _  _  . 

IF  (KPAGNTN-55)  18,18,19 

.W  R  I.T  E_  .1 6  «.  16.)  _QflB  HR  ,.A  6uS ,  0.MP  HS.N.  #  J1KEKB  0  KP  M.N_S ,  Ji  R  PJ1 R  W _ 
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'C-'  AT  £«nO.An  t/riH  =  ,F5(  l,5rt  *NG  s  ,  F  4  ,  2 ,  /  H  M/HRNs  ,  F  6 , 1 , 7h  M/Hfi£  =  , 

'  H  »  o  V  T  '  !  S  r\  r1  A  Q  ’• 1  T  '.  ♦  ? 

TO  '?  >>  7 1  v 

k  :  T  fc  ( ;> ,  1 7  )  0  :?HR,AN:G,  DMPHRN,D',1PHRe.DMPHrtS,  DMPHRW 

17  FOR  AT  (lnl.Ah  M/ H« = » F 5 , 1 , 5 H  ANGs,F4,2,7H  M/HRNs , F6 , 1 , 7H  M/HR£8i 
1 F  6  i  1  *  7  h  M/HWS=,F6,1#7H  M/*RW= , Fo , 1 > 

- FC  CO.'IP JTcD 

37:9  IF  IKSH-300)  65,60,60  .  _  _  ...  _  _ 

6  0  F  C  =  o 

no  10  160  .  _  _ _ _ _ 

6*5  I  F  (  K  s  H  -  2  0  0  )  75,70,70 

....70..  FC=,1...  _ _ - 

no  TO  160 

..75  IF  (KSd-150.)_b_5,  8_0_,  80 _ 

80  F c  =  i  2 

no  to  uo  _ _ _ _  _  _ _ 

85  IF  (KSB-100)  95,90,90 

90  F C  = .  3  _ _ _ _  _ 

GO  TO  160 

95  IF  (KSa-75)  105,100,10  0  _ _ _ 

ion  fc=,4 

_GO  TO  160  _ _ _ 

105  IF  ( KSri«"50  >  115,110,110 

110  FC=,5 _ _ _ _ _ _  ... 

GO  TO  160 

115  IF  ( KSri-40 )  125,120,120_ _ _ _  _ _  _ 

120  FCs,6 

GO  TO  160  __ _ _  _ _ _  _ 

125  IF  (K8S-30)  135,130,130 

130  FC=,7.  _ _ _ _  _ 

GO  TO  160 

1 3 5_  IF  (KSH-20)  145,140,140 _ _ _ 

140  FC= , 8 

_  GO  TO  160  _  _ 

145  IF  <  KSd-10  )  155,150,150 

150  FC= .9  _ 

GO  TO  160  ' 

155  FC=i,0 
160  WMF(1)swH1*DM 
WMF(2)*W02*DM 
WMF  (  3  )  =WMF  ( 1  )~ 

WMF<4)*wMF(2) 

"WMF(KOIH)=WMF(K'DIR)*FC‘ 

IF  (KSTY-2)  210,210,220 

210 ‘ <h*i 

GO  TO  250 

220  IF  (  K  S  T  Y  *  5  )  23  0 ",  230,24  0 
230  «h=2  _ 

GO  TO  250 
24 0_  KH  =  3  __ 

250  IF  (KCH-2)  260,270,200 
260  KRRsO 

GO  TO  320 
270  KRR  =  10 _ 
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GO  TO.  .5  2  0 

. .  »’j  ■ 

I  r  (  *\  O  <\  •  4 

0 ') ' 

K  ti  R  -  2  0 

G  O  TO  5  2  0 

s  j 

a  K  R  s  .5  u 

GO  TO  320 

81' 

1  K  M  •  M  L 

320 

(  K(J^ 

C---- 


340 

C---- 

350 

C---- 


0  S  l\  ,J 

r,A«p.-dAdCUCK  INDEX  CALCUUATbD 
4  I  \  =  (.'*')*T«  ,  01 
IF  (  d  I  M - 1 1> 0  ,  )  450*340*340 
P  I  n  =  1 5  0  , 

PROBABILITY  OF  BUILDING  TO  CATCH  FINE  CALCULATED. 
PRF< I#J,KIOT>*SIN(3,141593*BIN/300, > 
calculate  radiating  area  of. individual  eldg,  .  __ 

ARriLDUlsNMf  ( 1  ) 

ARHLDG2=WMF  (2)  —  .  _  _ _ _ - _ _ 

ARHLDG3  =  WMFO) 


C-”-- 

3602 


c  •  •  •  • 


ASBLDGAsWHF  (4)  ....... 

F L A E  HEIGHTS  IN  4  FARTS  OF  Bl 

HF1=ANBLDG1/KB1  _  _ 

HF2SAHBLDG2/W62 

HF3  =  ARBLDG3/L'B1 _ _ 

HF4=ANHLDGA/Wo2 

..IF  (HFl.EO.O)  GO.  TO  3606  ....  ... 
shapes  of  radiator  calcualted 

S1  =  wB1/mF1.  .  ... _ 


harts  of’buildinu  calculated 


GO  TO  3o0  7 

3606  SlsQ 

3607  IF  (HF2.EU.0)  GO  TO  3608 

_ S2*0B2/HF2 _ 

GO  TO  3610 

36Q6_S2s 0  _  _ _ 

3610  IF  ( HF3 , £0  f  0 )  GO  TO  3616 

. . S3*  HB1/HF3 _ 

GO  TO  3617 

3616  ,S3  =  0  . .  . .  _ 

3617  IF  (HF4,EU,0)  GO  TO  3618 

— S4*«S2/HF4 _ 

GO  TO  369 


.3606 

3610 


GO  TO  3608 


GO  TO  3616 


..  3616 
C---- 
369 
1740 
— 1750. 

1745 
_  1775 
1785 
.1820 
1760 


CLASSIFY  COMPONENTS  OF  WIND  VECTOR  AS  LOW*  MEDIUM  OR  HIGH 

_.I  F _ (JDMHHRN )  .1/40,1740*1745 _ 

IF  (DMPHRE)  1750,1750*1820 

_  IF_(DMPHRS-DMPHRW)  1770  *  1800 1.1.800 _ 

IF  (DMPHRE)  1785,1785,1775 

._IF  (DMPhRN -  DMPHRE)  1790 ,1 780  *1780 _ _ _ 

IF  (DMPHRN-DMPHRW)  1760*1805,1805 

.IF  (DMPHRE-DMPHRS)...1825i.i830*iQ40. _ _  . 

DMPHR=OMPhRW 

.CALL  K  V..CQNS  JPMPHR  *.(<.¥.). _  _ _ 

KVWsKV 

.<VE  =  KV  _ 

DMPhRsDMPHRN 

„  C  A  L  L_  A  Y— C  O.N  S._  LDH  P.H  B  *  .K  VJ _ 


146 


/ 


>v  y  .  -  v 

v  V  6  -  \  V 


\  y  -  ■>  v 


03/25/68 


TO  /  3  0 

■ft  =  O'lPnH’  ,-J 


C  J  N  S  v  0  y.  P  h  R  t  K  V  ) 


■')  ,X  •’  'i  '<  =  '1  P  ri  S 

CAuL  KV  CJNS 
K  V  S  =  K  y 
K V\sK V 

no  to  / 3 o 
ldQu  n.yPnP  =  UMPHKS 
CAL'.  KV  CONS 
K  V  S  s  a  V 
K  V  s  K  V 

OMP'iRsDMPhRW 
_  CALL  i< y_ c 0 N s_ 
KVP=KV 

_ KVt=KV 

M  A  J  [)  I  R  =  3 
_GO  TO  '/30 
1760  DMPHR  =  l)MPHRN 

. CALL  KV.  CONS. 

'<  V  N  s  K  V 
•<VS  =  KV 

nMPriR  =  DMPHR(i 

CALL  KV  CONS 
KVe=KV 

xywsKV  _ 

MAJuIR=l 
GO  TO  730 
1790  DMPnRsDMPriRfc 

_ C ALL  KV  CONS 

K  V  P  s  KM 
K  V'A  s  K  V 

D  M  P  H  R  =  0  H  P  H  R  N~ 

_ CALL  KV  CONS 

K  V  N  =  K  V 

KVSsKV  __ 
’  M A JU I R=2 
GO  10  730 
1605  '  HMPHRsnHPHR'N 
CALL  KV  CONS' 
K  V  V  =  KM 

_  KVS=KV 

0  M  P  n  R  s  O  M  P  H  R  W " 
CALL  KV.CPNS.. 
'  KV*=KV  ’ 

KVFsKV  _ 

MA JD I R  =  1 
_GO  TO  730 
1625  DPPHRsOMPhRS 
CALL  KV  CONS 


( :i  ‘1 P  n  R  i  K  V  ) 


(  n,MPHR,KV) 


>  (DMPHRiKV) _ 


.(OMPHPiK.VJ. 


J  i)MPhR»KV).. 


( DMPHR, K V ) 


(OMPHRiKV) 


(DMPHRiKV) 


( OMPHRiKV) 


<  OMPHRiKV) 
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<  V  S  s  K  V 

•\ V  vs K  V 

HM^mRs  I)NPHR£ 

CALL  K V  CONS  (UMPHRiKV) 

KVriK V 
"<  v  .<  S  K  V 
•')  A  J  n  I  r(  =  J 

CO  TO  740  .  _ 

1830  DMP«Rsl)MPHRfc 

CALL  KV  CONS  (  PMPHR  #  K V )_. _ 

KVfcsKV 

K  V  *  K  V  .... _ _ 

nMPnRsDMPHHS 

CALL  KV  CONS  (DMPHR.  #_!<¥> _ 

KVS  =  KV 

KVNsKV  . . . . . 

MAJUIK*2 

GO  TO  730  _ 

730  DO  159/  JJ=1,16 

IF  (JJ-4) . 2000,2000# 366  _ 

366  IF  (JJ-8)  2010,2010#  367 

367  IF  (JJ-1?)  2020,2020,2030 _ 

2000  IF  (JJ.ME.l)  GO  TO  2007 

_  IF  (NUMN.EQ.O)  -GO  JO.JUUL5 _ 

2007  S=S1 

. __ . ...ARRlDGsARHLDGI _ _ 

IF  (JJ.NE.l)  GO  TO  364 

_I F  (DllPHHN)  .Z0  0.,  70  0#720 _ 

720  DMPHRsDMPHRN 

_  _GO--TQ  2028 _ 

2010  IF  (JJ.NE.5)  GO  TO  2017 

_ IF  ( NOME , EQ .-0  )_.GO.-IO  J9055 _ 

2017  S=S2 

_ ARBLDGsAR8LDG2 _ 

IF  (JJ.NE.5)  GO  TO  364 

_  .  _IF  .(DMPHRE).7.0Jl#.ZOJ)*-Z5fl _ 

750  DKPHRsDMPHRE 

_ GO—TO.  -2028 _ 

2020  IF  (JJ.NE.9)  GO  TO  2027  . 

_ _ IF  (NUMS.EQ.D)  GO  TO  91Q5 

2027  S=S3 

... _ _ ARBLDG*AR8LDG3 _ 

IF  (JJ.NE.9)  GO  TO  364 

_ IF  .( DMPHRS ).  JJjL7.0.Q.*78.Q _ 

780  DMPHRsUMPHRS 

_ _ GO_.TO.2028 . .  . . 

2030  IF  ( J J • NE . 13 ) GO  TO  2037 

_  _ I  F_.-(  NUflrt  #.cQ .  0  ?„ SJ-XO  9155 

2037  S=S4 

. . .  . ARBLDG* AR8L0G4 _ 

IF  ( J J , NE , 13 ) GO  TO  364 

_ _ IF ...( DNP.HR  W.)..7.04#iCJUW.O _ 

860  DHPHRsOrtPHRW 

.  ._  2023.  IF  _(.DNPHfl_=J.  )_2035* 2045.# 2.010.. 

2035  KV»1 

_ G  Q_TjQ_3  6  4 _ 


148 


.  03/25/68 

? ',  4  *  IF  rj::?nrt  -i*,)  2043,2050,2050 
R o  TO  8o4 
GO  i  0  >5 o 4 

700  <V-i  .  .  .  ......  _ _ _ —  - - 

C - CALCULATION  OF  f  HEORfcT I  CAL  SEPARATION  DISTANCES 

3 6 A  IF  (S-1,5)  1380.1425.1420 _ _ _ 

1300  IF  (Ki/-<i)  1390.1400.1410 

—  1390  .IF  l  ARBLDG'465 .  )  1393 , 1393. 1394 . . . 

1393  Ys5,4h*(ARBLDG/1000,  )*10» 

_  _ GO  TO  150  0 . .  _.  ..  _  _ _ _ 

C -  BELOW  IS  The  SOLUTION  OF  THE  FOLLOW l NG  tOUATIQN  - 

_  C - ...  Y *  *2-83,6  (  A  R  p  L  O  Ci  / 1 0  0  0  )-2.53Y*l  5j  7_*  Q_. _ THE  FINAL  Y  EQUALS  TEN  T  IMEj S___ 

C----  THIS  Y 

_ l394_nET  =  6 , 4Q0  9-4  ,  *  (  -  33 . 8*  (  ARBLDG/IOOO .  )  ♦15.,  /  ) _ ! _ 

IF  (DET)  1392.1395.1395 

_ 1392—NR  LT6  .(o,393)  I  ..J _ _ 

393  FORMAT  (1H0.4H81K  ,I2.5H  DIR  .I1.1X.21HY  HAS  NES  DETERMINANT) 

_GO  TO  3710  _ 

1395  Ys(2,53*SQRT  (DET  5 )*5. 

_  _ G 0_  T O  150  0  _  _ 

1400  IF  ( ARBLDG-1300  .  >  1401 , 1401 » 1402 

_ 1.4  0 1 _ Y  s  6 , 2_3_*  (  A  Hj3jJ)GZl_O.O.fLLl51.aJ _ 

GO  TO  1500 

C - _RELOW  IS  THE  SOLUTION  OF  THE  FOLLOWING  tOUATIQN  _ 

~C-*--  Y**2-34I3(ARBLDG/1000  )*8,1Y*'44,6*0  ,  THE  FINAL  Y  EQUALS  TEN  TIMES 

c - .this  y  _ _ _ _ _ 

140  2  DET*65, 61-4.  *(  -34,3*  <ARBLDG/100(i. )  ♦44,61 

_  ..IF. (DET)  1392. 1405. 14.0fi _ 

1405  Ys(8,l*SQRT(DET) >*5, 

_  .  .  _GO_.TO.  .150  0 _ _ 

1410  IF  < ARBLDG-2380  .  >  1411,1411,1412 

1 4 1 1  _ Y  =  5 , 76*  <  AR3LDG/1 0 0 0_i_)JLl Qj _ 

GO  TO  1500 

_C  -  -  -  -_R  E  L  O  W  IS  THE  SOLUTION  OF  THE  FOLLOWING  bQUAT  I  ON  *  _ _ 

C Y  *  *  2-29  ,~4  <  A  R  B  L  D  G  /i  0  0  0  )•  1 3 , 75  Y  ♦  6~ 9",*9"*  0  ,  THE  FINAL  Y  EQUALS  TEN  TIMES 
C----  THIS  Y 

~  1 4i  2~D  ET  =  1  d  9~0  62  5 (V 2*9.’4 VCaWC D'GTi  01 5‘oT >*6 > 

_  _I F_(  DET  )_  1392_.  1415.1415 _ 

1415  Ys(l3,75*SQRT(DET))*5, 

_ GO _ T  O  1 50  0.  _  _ _ 

14  20  IF  (  S‘- 8 ,  >  1 425 , 1 46' 0  » 14' 60 

_ 1 4  2  5 _ I F  ( K  V - 2 )  1430,1440,1450  _  _ 

1430  I F  (  AHdLDG-725  ,  )  1431, "1431,1432 

1431  Y s 4 , 63* ( A RBLDG/IOOO ,  )*1Q  , _ 

GO  TO  lYO'O 

C -  RELOW  IS  THE  SOLUTION  OF  THE  FOLLOWING  EQUATION  • 

C-"— -  Y* * 2 - 29,~3(  ARRL D G>  1000) * 3 , 35Y*2 1 , 2 ■  0  ,  THE  FINAL  Y  EQUALS  TEN  TIMES' 

C - THIS  _Y _ _ _  _  _ _ 

1432  OET*ll , 2225-4 . * ( -29, 3*( AR8LDG/1000  ,  )*2l , 2 ) 

_  _IF  (DET)  1392,1435,1435 _ _ 

1435  Y* ( 3 , 35*SQRT ( DET ) )*5, 

_  __GO_TO  1500  _ _  _ 

1440  IF  (ARBLDG-1645,  )  1441,1441,1442 
_  1 4_4  l_Y_s  6  2  ♦  ( A  R I L  n  G  / 1 0  0  0  t.  L*  l.Ox _ 
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i 


1470_ 

.1475_ 

1476 
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G 0  TO  1300 

»EL0W  IS  The  SOLUTION  HF  THE  FOLLOWING  tOuATION  - 

Y**2-30,3(  ARRlUG/1OQ0).9,25Y«-49,8=0.  ThE  FINAL  Y  EQUALS  TEN  TIKES 

THIS  Y 

DETsfi3,5625-4.*(-30. 3*<A«dLl3G/1000  ,  >*49,8) 

IF  ( Or  T )  1392*1445,1445 
Ys(9,2S*SURT(UET))*5. 

00  TO  130  0  .  . . .  ...  ..... 

IF  ( AHHLDU-1110 . )  1451,1451*1452 
Ysci,  4o*<  AHbLHG/1000  ,  )*10  , 
ro  TO  1300 

BELOW  is  The  SulUTIUN  OF  THE  FOLLOWING  EQUATION  - 
Y**2-33.2<ARBLDG/l0Q0)*9,4Y*36,a«Q,  THE  FINAL  Y  EQUALS  TEN  TIMES 

THIS  Y  ... _ _  _ _ _ _ _ 

nET=ao,36-4.*< -33,2*<ARBLDG/1Q00, >*36,8) 

IF  (DfcT)  1392*  1455,1455  _  _ _ 

Ys ( 9 , 4*SQHT ( Dfc  T ) )*5, 

GO  TO  150 U  _ _ 

IF  (KV- 2)  1465*1475*1485 

IF  {AHELDG-1420,  )  1466, 14.66,  .1.467 _ _  _ . .  . 

Ys4,45*(AH8LDG/1000  ,  >*10. 

GO  TO  1500  _  . .  ... _ _ _ _  .  . . .  _ 

RELOW  IS  THE  SOLUTION  OF  THE  FOLLOWING  EQUATION  - 

Y**2-21, 9 (ARBLQG/lOOO.).*6...3aitiljJJjfiLi _ l££XLfilAlJL EQUALS.  TEN.  TIMES. 

TH  I  S  Y 

D  E  T  *  3  9 , 9  4  2 4  -  4  ,  *  (  -  2 1 .9  *.  (MdUMtei  0.Q.Q b_L*£l .  1 1 _ 

IF  (DET)  1392,1470,1470 

Y*(6,32*SQRT.<D6I))*5, _ _ _ _ _ _ _ _ 

GO  TO  1500 

IF  (ARHLDG-2350.  >.  1476, 14 ?.6.,.  147.7. _ _ _ _  _ _ _ 


Ys4,56*(AR8LDG/1000» )  *10 , 

_ _ GO  T 0-15.0.0 _ _ _ _ 

C -  BELOW  IS  THE  SOLUTION  OF  THE  FOLLOWING  EQUATION  - 

_ C  -  —  -_V  **2-21,A<ARHLDG/JL0  0  0  )_-10, 76Y*50.2»U.  THE  FINAL  Y  EUUA  L  S  TEN  JJMfi  S_ 

C----  THIS  Y 

_ 1477  DETsllS. 7776-4. *(-21. 4*(AHBLDG/lQQ0t )*50.2) _ 

IF  (DET)  139?, 1480*1480 

_ l480_Ys(10,76«-SQRT.<DET.  ).).*  5 , _ 

GO  TO  1500 


.1485._IF  (  ARBLDG*2590.,  ).  1486* I486, 1  >07 
i486  Ys4,74*(ARBLDG/1000  ,  )*10  * 

_G0  TO  1500 


—.1490. 

1500 

_ 1502. 

1503 


BELOW  IS  THE  SOLUTION  OF  THE  FOLLOWING  EQUATION  * 
Y**2-2412(ARBLOG/lOOO>*ll_2,28jril2J 75  =  0, TH E_F  I N  A L  Y  EQU A  L  S_T  E  N  TIMES 
THIS  Y 

DETs 150.7984-4. *(-24. 2* ( ARBLDG/1000* >*62. 75)  _  _ 

IF  (DET)  1392,1490,1490 

Y*  ( 12  1 28*.SQRT  (  DET ) )  *5 , _ _ 

IF  (JU-4)  1502,1507,1508 

I F  ( J.U  -  £)_15  0  3  *.l  5  Q  4*15.0  5_ _ 

YN*  Y 


IF  (KWN1)  .2605*  260 
2  00  PRF ( I »  J.KLOT )  =  , 98 

_ _ PRNK  I*JiKL0mi. _ 

GO  TO  1587 

_2605..WNl?K.kill _ 
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■ 
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/ 
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1 1559 


1559 


1  p  6  0 

925 

930 

1565 

1690 

1910 

1900 


1905 
1920 
6  025 
1368 
1504 
2  61  O' 


Xsl,-WN1/Y 

IF  (X-l.)  15 60 1 1560 i 
X  5  1 

GO  TO  9  30 

IF  (X)  925  #  9 30 i 93  0 
X  =  0 

IF  (WN1-Y)  1565 } 6025*  6025 
KV=KVN 

IF  (MAJDIR-2)  190  0  # 19  0  5 1 191 0 
IF  (MAJOlK-3)  1920 1 1920 1 19(15. 
CALL  HITH  (  K Vi  X,  PR ) 

GO  TO  1366  .  _ 

CALL  PfcHP ( K V i X  j  PR  > 

GO  TO.  1368 _ _ 

CALL  AUNT  (KViX.PR) 

GO  TO  1368  __  _ _ 

PRNK I i J i KLO  T ) 8  0 
GO  TO  1587 


PHNKI  i  J  i  KLOT )  *PR 

GO  TO.  1587 _ _ _ 

YNsY 

IF  (KWN2)  26l5,26l0i_2.6i5. 


PRF ( 1 1  J « KLOT  )*»  98 
PRN2  ( I «  Ji  KLQUJl-»- 
GO  TO  1587 


_ 2615  „ 


1512 


WN2*.KHN2 _ _ _ 

X=1,-WN2/Y 

IF  (X-1.L1506, 1506. 1512. 
x  =  l 


1506 
.  935 
940 
1.585. 


GO-TO  .9.40  _ 


1935 

'1925 


1930 
"1945' 
6055' 
"1369 
1 5  0  5 
"2620 


IF  (X)  935.940.940 
,X  =  0 . .  ...  ....  _ 

IF  ( WN2-Y )  1585#  6055.6055 

KVJ.KVN  _  _ 

IF  (MAJDIR-2)  1925#1930.1935 
IF  (MAJDIR-3)  1945.1945.1930 
CALL  WITH  (KV.XiPR) 

GO  TO  1369  _ _ 

CALL'  PBRP  "(KV.XiPR’) 

GO  TO  1369  _ _ 

CALL  AGNT  <KV|X,PR) 

GO  TO  1369  _ 

PRN2 ( I  *  Ji  KLOT  J  ’O 

GO  TO  1587  _ 

"  P  R  N  2  ( Ti  J « KLO  Tf*  PR 

GO  TO  1587  _ 

YN»Y  '  . . 

IF  ( KI4N3 )  2625i  2620 » 2625 


2625. 

"865 


PRF ( 1 1 JiKLOT  >■ , 98 
PRN3(  1 1  Ji^WQiL*!  i 
GO  TO  1587 

WN3«KHN3  _ 

X=1 i -WN3/Y 


IF  (X*l,L_8lfl,870.865 

X*1 


t  N  ‘J  •  *i 


04/2 1>/ Ad 


o7C  If  (X)  943,950,950 

945  x  =  G 

950  IK  U\4-Y>  1595,6085,6085 

l?-;5  4 V  =  -v v \ 

!  F  (MA^0Ii9-2)  1950 ,  1955#  1960 
i960  !  r  IMAJ3IR-3)  1970,1970*  1955  . 
1950  CALL  w I T h  (KV,X,PR> 

GO  TO  1470 

1955  CALL  PS RP  <KV,X,PR> 

GO  TO  1470 

1970  CALL  AG\T  (KV,X,PR> 

GO  TO  1370  .  ^  -  . 

6385  PHM3C I*J*<LOT)sO 

GO  TO  1587  _ 

1370  PR\3( I* J,KLOT)sPR 

GO  TO  1587  . .  _ 

1507  YN* Y 

IF  (KWN4)  2635,2630*2635 _ 

2630  PRF(I#J,KL0T>»,98 

.  .  .  .PRN4 ( 1  *  J*  KLOT )-*l  • _ 

GO  TO  1587 

2635. WN4«KWN4  .  _ 

X=1,.WN4/Y 

IF  C X r 1 1  )  880*  880,875 _ 

S75  X=1 

.GO.  TO  960  .  _ _ _ 

880  IF  (X)  955,960,960 

955-  X  =  0  .  .  _ 

960  IF  (WN4*Y)  1605,6115,6115 

.  _  ...  1605_KV?KVN  ....  .  ... _ 

IF  (MAJDIR-2)  1965,1975,1980 

_ 1 9  8  0  -.  I  F  C  HA  JD I  R.".3  ).-1.99  0^-1  SL9  Olj.1972 _ 

1965  CALL  WITH  (KV,X(PR) 

_  __GO  _LO  1471  ....  .... _ 

975  CALL  PERP(KV,X,PR> 

_  GO  TO  1471  _ 

1990  CALL  AG»T  (KV«X,PR) 

_  ..GO  TO  1471 . . 

6115  PRN<( I, J,KLOT)=Q 

_ _  _ GO  _.T  O  1587  .  _ 

1371  PRN4 { I , J, KLOT ) *PR 

_ _  .  GO_TO  1587  _  _ 

1508  IF  (JJ-8)  1670,1515,1516 

_  1 6  7  0  _I  F  .U 4 - 6 ). .1 5 0.9 ,.  1 5 1 0.,JL5J.  1 _ 

1509  YE*Y 

_  _  I  F  (KWEl)  2645,2640,26.45 _ 

2640  PRF (  I , J, KLOT )  =  , 98 

_  _PR£l<  I,  J  *  KLOT.}  =1-. _ 

GO  TO  1587 

__  2645  WElsKWEl  _ 

X=1,-WE1/Y 

_  _  IF  .(X-l,).  .890,890, 885 _ 

8 85  X s 1 

.  ..  GO  TO  970  ...  _ 

890  IF  (X)  965,970,970 
_  965— XjO _ 
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< 7 ;  IF  l  Af-1-Y  )  1625,6145,6145 

1'25  *' V  =  '< V c 

IF  (MAJDH-2)  2070, 20d5, 2090 

:f  (majoih-3)  207o;237 0,2110 

2:70  "ALL  Pt:RH(KV,X,?R) 

GO  TO  137  2 

2  •'  SC  CALI  WITH  <KV.X,PR) 

00  TO  1372  ..  .  . . . . 

2110  CAuu  AG\T  <KV.X,PR) 

00  TO  1372  _ _ _  _  _  _ _  ...  _  .  .. 

6145  PHcl ( ! , J, KLOT  )  =0 

00  TO  1537  _  _ _  _  _ _ 

1372  PREK  I,J,KLOT)=PR 

00  IQ  1537.  _ _ _ 

1510  Vc=V 

IF  (KW62)  2655,2650,2655 _ _ 

2650  PHF(I»J*KL0T>*,98 

PRE2( I, J,KLOT)sl,  _  _ 

GO  TO  1587 

2655  W  E  ?  =  K  W  6  2  .  .  _ _ 

X=1,-WE2/Y 

IF  (X-l,  )  1622  »  1622#  1623 _ ; _ 

1623  X=1 

00  TO  980  __ _ _ _ _ 

1622  IF  (X)  975,980.980 

.  975. X  =  0  ..  _ _ 

980  IF  (WE2-Y)  1635,6175.6175 

1635  KV=KVE  _ _  _ 

IF  (MAJOIR-2)  2095,2100.2105 

2105  IF  (MAJDIR-3  )  2095,2095j_21?0 _ _ _  _  _ 

2095  CALL  PcRP  (KV.X.PH) 

.GO  TO  1373.  .  _ _ 

2100  CALL  WITH  (KV.XfPR) 

_G0  TO  1373  _ _ _ _ 

2120  CALL  AGNT  (KV.X.PR) 

_GQ  TO  1373  _ _ 

6175  PRE2  < I . J. KLOT  >  s0 

GO  TO  1587  _ 

1373  PRE2 ( I ,  J.  KLOT  )  =  PR 

_GO  TO  1587 _ 

1511  YE  =  Y 

IF  (KW63)  2665.2660.2665 
2  6  6  0  P  R  F  (  I ,  J .  K  L  0  T  >  =  ,  9  8 

PRE3(I.J.<LOT)_*l, _ _ 

‘GO  TO  1587 
2665  WE3=KWE3 

X  s  1 ,  *  W  E  3  /  Y 

IF  (  X- 1 .  )  895.895,1580 _ _ _  _  _ 

1580  X=1 

GO  TO  990  _ _ _  _ 

395  IF  (X)  985,990,990 

985  X  =  0  _ _ _  _  _  _ 

990  IF  ( WE3*  Y  )  1644,6205.6205 

1644  KVsKVE  _  _  _ _ 

IF  (MAJDIR-2)  2130,2135,2140 
2140  JF  (MAJDlR.“3)_2l30, 2130. 2145 _ 
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2130  CALL  PERP  (<V,X.PR) 

GO  TO  1374 

2135  CALL  WITH  <KV,X,PR> 

GO  TO  1374 

2145  CALL  AG.NIT  (KV,X,PR) 

GO  TO  1374 

6205  PRE3 ( I , J, KLOT  >  8 0 

GO  TO  1587  _ 

1374  PRE3  ( l,J,KLOT)sPR 
GO  TO  1587 

1515  YE* y 

IF  (K«b4)  2 6 7 5 1  2670 1 2675 
2670  PRF(I,J,KLOT)»,98 

DRE4  (  1 » J,KLQT ) =1 1  _ 

GO  TO  1587 

2675  RE4tKRE4  . . . 

Xrl,^WE4/Y 

IT  (X-l.)  905, 905, 900  _ 

900  X  =  1 

.  ..  GO  TO  1000  _ _ 

905  IF  (X)  995,1000,1000 

.  995  X s 0  .  _ 

1000  IF  (WE4-YJ  1655,6235,6235 

_ 1655  KV«KVE  . .  .  - 

IF  (MAJDIR-2)  2150,2155,2160 

_ 2160_I F  (MAJDIR-3)_.2l50,.2lliUU6i 

2150  CALL  PERP  ( KV , X , PR  > 

_  -_GO  TO  1375 _ 

2155  CALL  WITH  (KV,X,PR) 

_  -GO  TO  1375  _ 

2165  CALL  AGNT  <KV,X,PR) 

_ _GO-  TO  1375 _ 

6235  PR64 ( I , J, KLOT ) a0 
_  ._GO  TO  -1587  - _ _ 

1375  PRE4 ( I , J, KLOT ) *PR 

_  _GO  T 0.-1587_ _ 

1516  IF  (JJ-12)  1517,1521,1523 

...._ . —  1517  IF  (JJ-10).  1662,l5.t8il52Q _ _ 

1662  YS=Y 

_ _ I  F— (  K  wSl ). .26654  2680.4.26  &5 _ 

2680  PRF (  I  , J, KLOT  >  *  ,  98 

...  _  _PRSl{  I ,  J,KL.Ot)*JL, _ 

GO  TO  1587 

_ 2685_WS1=KWS1  _ 

Xsi,*WSl/Y 

. . .  _IF  .(X-l.,  )-1529 1 15 29*1531 _ 

1531  X=1 

_  _GO_ T  Q— 1010 _ _ 

1529  IF  (X)  1005,1010,1010 
-  ..1005-  X  =  0.  .  _ _ _  .  _ 

1010  IF  (WS1-Y)  1665,6265,6265 

_ 1665_KVjK.VS _  _ _  .  . 

IF  (MAJDIR-2)  2170,2175*2180 

_ 2 1 8 0 _If.  -i-MAJDI R*-3 )_2 1 8 5. ,  214.5x2 1.75 

2170  CALL  AGNT  <KV*X,PR> 
nn 


/ 


0!  A  L  w.  P ::  R y  (  K  V  *  a  ,  P  K  ) 

"J  T0  ld'/o 

2Lc  >  l  a'  I  T  h  (KV.X.PR) 

'■2  ‘  2  1  o  V  o 
■>KSl(I.J#KLO7)-0 
'.J  TO  l?d'/ 

lo7o  -RSK  !  ,J,KL0T)=PR 

’>  U  IV,’  1?3  / 

1  L>1 5  VS-r 

TF  (KaS2)  2695,2690,2695 _ 

2690  PRF ( I # J«KLOT)s,98 

PRS2  (  I »  J  »  KLOT  5  S1 •_ _ 

00  TO  1587 

....2695  WS2  =  KWS2 _ 

v  -  i  .  j  c  o  /  v 

IF  <  X  - 1 ,  >  1534,1534,1536 _ 

1536  X  =  1 

00  TO  102 J  _ 

1534  IF  (X)  1015,1020.1020 
1015  X=0 

1020  IF  CWS2-Y)  1675,6295.6295 

1675  KV=KVS  _ 

IF  (MAJDIR-2)  2190.2195,2200 
220  0  IF  (MAJOIR-3)_2205,.22Q1i2195 

2190  call  agnt  (kv,x,pr) 

00  TO  1377  _  _ 

2195  CALL  PSRP  (KV.X.PR) 

.no  TO  1377. _ _ 

22C5  CALL  KITH  (KV,X,PR) 

CO  TO  1377  _ 

6295  PRS2 ( I , J,KLOT)=0 

GO  TO  1587  _ _ _ 

1377  PRS2C I . J,KLOT)=PR 

no  T0_15_87 _ 

1520  YS=Y 

_IF  (KWS3)  3005.3000,3005 _ 

30  0  0  PRF  (  I  ,  J,  KL*0T")  =  ,  98 

_  PRS3  < I . J,KLOT)=l, _ 

00  TO  1537 
3005  >IS3  =  KWS3 

X  =  1 ,  *  K  S  3  /  Y 

IF  (X-l,)  1533,1533,1532 
1532  X  s  i  ----  - 

00  TO  1030 

1533"  IF  (X  >'' 1025',  1030", i"0'30‘ 

1025  X  =  0  _  '  _ 

1030  IF  (WS3-V)  1685,63 25, 6325 
1665  K V  =  K V S 

IF  (KAJDIR-2)  2210.2215,2220 
2220  IF  (MAJOIR-3)  2225. 2221, 2215 
2210  CALL  AGNT  (KV.X.PR) 

no  TO  1 37  8_  _ _ 

2215  CALL  PERP  (KV.X.PR) 

CO  TO  1378  _ _ 

2225  CALL  WITH  (KV.X.PR) 

GO  T 0_1 3 78 _ 
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632-3  PrtSoi  I  .  J,KLOT5=0 
*0  TO  13d 7 

2.376  PRS3I I # J,KLQT)=PR 
00  TO  1367 
1321  VS=Y 

I F  (  K  w  S  4  )  3015  »  3010  #  3Q15 
3010  PRF( I . J.KLOT>= ,98 

PRS4(I.  J.KLOT)*l,.  ..  _ 

0,0  TO  1387 

3015  WS4sK^S4  .  . . . 

X=l,-wS4/Y 

.  IF  (X-1,1.  915 .  9l5.  910 _ 

910  X=1 

-GO -TO  1040  _ _ 

915  IF  (X)  1035,1040.1040 

1035  X»0  ...  _ _ _ 

1040  IF  (WS4-Y)  1695,6355.6355 

1695_KV*KVS  _ 

IF  (MAJDIR-2)  2230.2235.2240 
2240  ..IF  .(MAJOIR-3).  2245,2245.2235 
2230  CALL  AGNT  (KV.X.PR) 

.  . _ GO  TO  .1360 _ 

2235  CAUL  PERP  <KV.X,PR) 

_ GO  .T-Q-136Q _ 

2245  CALL  WITH  (KV.X.PR) 

. .  .  _GO..  .T0...1360  _ 

6355  PRS4(I.J,KLOT)«0 

...  .  _G0.J.0l.1587  _ _ _ 

1360  PRS4(I.J,KLOT)=PR 

_ G0_LQ._1587_ _ 

1523  IF  (JJ.EQ.16)  GO  TO  1527 

_ lf_  xjj-l.4)  i uLimam _ 

1664  YW* Y  .  . 

_ I F.  _( KW  HU  JS  0  25 jJ  D2f*  _ 

3020  PRF(I. J,KL0T)».9S 

_ PRWH.UJi^LOIJ*!*- _ _ 

GO  TO  1587 

.3LQ25_WWi*KWJil _  _ _ 

Xsl.-wWi/Y 

_ IflJX-1.)  g  tuULAUHSl _ 

1539  X*1  , 

... _ GO_tQ-J,05U _ _ 

1541  IF  (X)  1045,1050,1050 

.104  5_X.«  fl_ _ J - 

1050  IF  ( WRl* Y )  1705,6385.6385 

1205-KVAJtY.w _ _ _ 

IF  <MA JO  I R”2 )  2250.2255.2260 

.2260—l.F _ LtlA  J01il*-3 ) — 2230. 2250.2265, 

2250  CALL  PERP  <KV.X,PR> 

. _GO_ID_13.61 _ 

2255  CALL  AGNT  (KV.X.PR) 

_ GO  TO -13 61 - 

2265  CALL  WITH  (KV.X.PR) 

_ GO-JTjOL  JL361 _ 

6385  PRW1 ( I . J. KLOT ) *0 


IH  > 


i  o  '  r\  .\  1  (  i  *  .)  i  K  l  u  T  )  =  P  R 

"  G  T  C  1 3  c  7 
1  -J  2  V  v  A  =  Y 

IF  U**2>  3035,3030,3035  .  .  . 

>•'”3  0  p  (  I  ,J,KL0T)=|98 

pRA^(4/ji^LQT)=l»  .  ._ 

GO  TG  1po7 

j  .  35  ■  a 2  =  K  a  a'2  —  .... 

a s i  ,  .^2/ Y 

IF  vX-1,  )  1542  « 1542# Ib43  _ _ 

1  5  4  3  X  =  1 

GO  TO  10 60  .  -  _ 

134?  IF  (X)  1035, 1060  1  1060 
.1055  X  =  Q  _ _ _ .  _ 

1  060  IF  U*2-Y)  1715,6415,6415 

1715  K  V  =  K  V  X  ....  _  _ 

IF  (MAJDIR-2)  2270,2275,2280 

2  2  80  If  (  MA  JL)  I  R.*3  >  ..227  0  ,  2  2.7JJ.I  2JJ  8-L. 
2270  CALL  PfcRP  (KV,X,PR) 

CO  TO  1362  .  _ 

2275  CALL  AGNT  <KV~,X,PR) 

CO  TO  1362  _ 

2285  CALL  i*i  I TH  (KV,X,PR) 

CO  TO  1362 _ 

6415  PRW2  (  I »  J , KLOT  )  s0 

CO  TO  1587  _ 

1362  PRW2( IfJiKLOTJsPR 

GO  TO  1587  _  _ _ 

1526  YW=Y 

IF  (  K w *1 3  )  3 0 4 5 1  3 0 4_0_»_3j) 4 5 _ 

3040  PRF ( I »  J, KLOT )  =  , 98 

. PRW3U#  J,K10I)^JL, _ 

GO  TO  1587 

3045_WW3»KWW3  _ 

x  =  i7-w'w  3  /Y 

_I  F  C  x - 1 1 )  1544,1544«1546 
1546  X=1 

CO  TO  1070 

1 54  4“ IF  YX)  1 0 65',~i 0  7 0 ,10 7 0 
1065  X=0 

1070'  IF'  (W w 3  -  Y )  1725,6 445*6 445 
1725  KVsKVW 

“IF  (MAJDIH-2)'  2290,2295,2300 
2300  IF  (MAJDIR-3)  2290,2290,2305 
'  2290*  CALL  PfeRP  '<  KV  ,'X  ,  PR  >* 

GO  TO  1363  • 

2295  CALL  AGNT  <KV,X,'PR> 

GO  TO  1363  _ 

2305  CALL  rflTH  '(KVi'xYpR) 

CO  TO  1363  _ 

6445  PRW3 ( I  *  J, KLOT  >  s0 

GO  TO  1587  _ 

1363  PRW3< I , J , KLOT ) =PR 

GO  T 0_1 587 _ 

1527  YWsY 

_ IF  (KWW4)  3055 , 3050 ,3055  _ 
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3  35  0  (  !  ,  J,KL0T>s,9H 

PR  <4  (  1  .  J,  KUOT  )  =1 , 
CO  TC  lao7 


3  755 

U  ;\  4 

S  K  a  4 

X  =  1 

,  -  «l  w  4  /  Y 

IF 

(X-l.)  1547,1547,1548 

1^43 

X  =  1 

c  O 

TO  1  0  a  0 

1647 

IF 

()()  10  75 , 1  0oG  ,  1060 

13  75 

.  a 

A  -  0 

1 0  d  0 

IF 

(w.-.'4-Y)  1735,6475,6475 

1  735 

IF 

(*AuJlR-2>  2310,2315,2320 

2320 

IF 

(MAJ01R-3I  2310,2310, 2325 

2310  CALL  PsRP  <KV,a,PR) _ 

SO  TC  1364 

2315  CALL  AGNT  <KV,X,PR> _ 

CO  70  1364 

2325  CALL  .4 1  T  H  (KV,X,PR) _ 

CO  TO  1364 

6475  PRW4 ( I , J , KLOT i s0 _ 

GO  TO  1587 

1364  PRW4 (  I  *  J,  KLOT ) =PR  _  _ 

CO  TO  1587 

-1587  IF  (JJ-NUMN)  1597, 90Q0j  9010 _ 

9000  IF  (MUMN.EQ.4)  GO  TO  1597 

IF  (NUM.M-2)  9020,9030 ,_9QJ.Q _ 

9005  PRM1( I , J, KLOT ) SQ 

.  9020-PRM2(I,J,KLOT)S0 _  _ 

9030  PRM3( I . J,KLOT)s0 

9040-PR;m4(  I ,  J,.KLOT.)XO _ 

JJs4 

. GO  .TO  1597  ... _ _ _ 

9010  IF  (JJ-4-NUMF)  1597, 9050 # 9060 

...  9050-  IF  (NOM':,tQ,.4)  GO.  .TO  .1597. _ 

IF  (NUKE-2)  9070,9080,9090 

_  9355-PREK  I,  J,KLOT)=0 _ 

9370  PRE2 ( I , J, KLOT ) =0 

.  9030  PRE3  ( 1 1  JiKLOT  ).SQ _ I _ 

9390  PRE4 ( I , J, KLOT ) *0 

—  J  Jsfl  _ _ 

GO  TO  1597 

9060  IF  (JJ-d-iMUMS>  1597, 9100, 9HQ_ 
9100  IF  (MUMS, 60, 4)  GO  TO  1597 

-IF  (NUM5-2)  9120,iUi)x914Q _ 

9105  PRSl ( J , J, KLOT ) *0 

9120  PRS2 ( I , J, KLOT ) =0 _ 

9130  PRS3( I , J, KLOT  >  *0 

.  9140-PRS4 {I,J,KLOT)?0 _ 

J  J»  1 2 

GO  TC  1597  .  . . . 

9110  IF  (JJ-12-NUMW)  1597,9150,1597 

9150  IF  (NUKW,60.4)  GO.  T0..1597 _ 

IF  (NurtM-2)  9170,9180,9190 

.  9155  PRWKI,  J,KLOT)*0 _ 

9170  PRW2( I, J,KLOT)=0 
.  9180  P.RH3  LI,  J,KLOI-).*D__: _ 
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~  v  7 


37Q7 

3715 


3710 

1270 


_ 1275 

_  1260 


1265 


~  .-v  <•!(  I  »  J ,  A  L  0  T  i  =  C 

„■  j  =  (• 

'■*  u  \  T  ’  'n  u  c 

IF  (KPAG\T-'.-5s>  3709,3707,370  V 
S  rx :  T  b  (o,37ll)  KFLFV,KM  ,PPO* 

)(,-«’  at  ( 1  m  0  ,  Pum’aNICjLE  OF  ELEVATIONS  ,12, 
1ITI0M  -’VO;),:  »  F4 . 2 »  6X , 5§H  PROBABILITY. 
2  '-1  F  R m A L  PUi_S£  =  ,F8,6,3X) 

K  P  A  G  N  T  N  =  K  P  A  G  N  T  N  ♦  2  .  _ _ 

GO  TC  3710 

mR I TE  (0,3715)  KFLFV,K!  I ,PROB 
FORMAT  (lnl,20HANGL£  OF  ELEVATION*  ,12, 
1 1  T  I  ON  PR  Oh  ,  =_._,_F.4 . 2  ,  6X,55H  PROBABILITY 
2HERmal  PULSEs  , F8 i 6, 3X ) 

KPAGNTN|s2  _  _  _ _ 

CONTINUE 
RPITE  (6,6) 

FORMAT  (1HG,119HBL0UK  DIREC-  LOT  NOW 

1  RADIATING  fire  GAGE-BAB-  F 

2  I  ON  ,  /  ,  "lH  ,  7X,  112HTI0N  '  "NQ,""SP 

30  AHEA  PROP-  COCK  INDEX _ 

4\Cr  ,/,lH  ,64X,7HABILITY) 

WRITE  (6, 1260)  I ,J.KLQT,PRN1( I,J,KLOT), 
17),PRr1( I , J,KLOT> , ARBLOGl, PRF( I, J,KLOT) 
FORMAT  (1H0,2X, I2,5X, U,6X, I2,2X,F6,4,2 
1F10,3,3X,F6.4,2X.F10,3,2X,F10,3,2X,F10, 
wRITF  (0,1265)  PRN2( I , J,KLOT> ,PRE2( I , J, 
1PRW2( I , J,KLOT> , ARBLDG2,HF2,S2, YE 
FORMAT  (1H  ,  2 0  X  ,  F 6  ,.4 , 2 X ,  F 6 , 4 , 2 X ,  F 6 , 4 , 2 X 
12X,F10,3,2X,F10.3) 

WRITE  (6,1265)  PRN3  i I iJ,KLOT) ,PRE3( 1 , J , 
1,  J,KLOT) ,  AR8l.D83,HF3,S3,  YS 

WRITF  ( o , 1 2 6 5  ) _ PR N 4  ( I , J, KLOT ) , PRE4 ( I , J , 

1 P  R  W  4  (  I ,  J ,  KLOT  )  ,  ARB  LOG  4  ',"H  F  4  ,'S  4,  Y  W 

_KPAGNTNs  KPAGMTN  +  12 _ 

CONTINUE" 

REWIND  27 _ 

END 


7  rl  DEGREES  »6X,22H  ROOM  I G  N 
uF  BUILDING  IGNITION  .  FROM...T 


9H  DEGREES  ,'6X,  22H  ROOM  I GN 
OF  BUILDING  IGNITION  FROM  T 


TH  EAST  "SOUTH  WEST 
LAME  RADIATOR  SEPARAT _ 

READ  '  SPREAD  '  SPREAD  SPREA‘ 
m E  l  G rl T _ _ SHAPE _ D  I  STA 

PREUI,  J,KlOT),PRS1(  j,  J,KlO 
,BIN,HF1,S1,YN 

X,K6,4,2X,F6,4#2X#F6t4,2X , _ 

3,2X,F10,3> 

k  L  0  T  ) ,  P  R  S  2(Jj  J ,  K  L  0  T  ) , _ _ 

,  F 6 , 4 , 2 X , F_1 0 ,3 , 2 3 X ,  F 1 0 ,3, _ _ _ 

K  L  0  T  ) ,  P  R  S  3(1 ,  J ,  K  L  0  T  ),_PR_W  3  (J  _ 
KLOT), PRS4(I,J, KLOT), 
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: '  -  &  (kv.  x»pr> 

* .  ^  \  -2  >  ,  - 10 , 4  u  o 

•  J  '  If  (  X  -  ,  an  )  4  0  5  « 4  n  i ,  4  0  6 

•:••  It-  (a,fto7*X-i?.r.6  7)  405,405,409 

■,  ;  >  'M  =  c:  ,  o  d  7  •  X  -  5 , 6  f»  / 

GO  TO  *t 5 G 

•'<1".  If  (  X  -  i  o  0  )  405,416,418 

*lb.  IF  (S,0*X-4,o)  405,405,419  . 

4 1 9  yKSD,0*X-4,0 

GO  TO  450  _ 

420  If  ( X -  ,  75  )  405,428,428 

425  IF  ( 4 , 0  *X"3 , 0  )  405,405,429 _ 

429  PRs4,G*X*3,0 

..GO  T0...430 _ 

405  PR s 0 

430  END  _  _ _ 


■K 
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SUGROUT  I'll;  PFR-MKV.X.PR) 

IF  (  R  V  -  2  >  *60,44?, 515 
*•  4  ?  IF  (  a  -  >  9  ri  )  440,448.318 
446  IF  (  X  -  i  9  0 1>  )  <t)j,  453,  450 
45~  IF  '(  4 , 4.X-3 . 35  )  553,533,452 

432  P  r<  =  4  ,  4  *  X  -  3 , 3  5 
GO  7  3  333 

433  IF  (X-,nM  43d,45t3»453 
4s5  IF  (4,G*X-2,9*)  553*553*457 
437  PR  =  4 , 0 • X - 2 , 94 

GO  TO  535 

458  tf  (X-,/9)  4d3 ,  463*  460 
4 o 0  IF  (2, 14*X-1 ,35)  553*553*462 

_  402  PRs2 , 14*X-1 , 35  _  _ 

GO  TO  335 

463  IF  ( V -  ,  o 3  )  466,468,465 
465  IF  C 1 , 23* X •  0 , 63  )  553,553,467 

467  PR=1 , 23*X*0 . 63 
GO  TO  355 

46fi  IF  (  X  ”,  4  0  )  553.553.470 

4  7  0  IF  < t652*X-.238>  553*553*472 

472  PRs,632*X-,25a  _  _ 

GO  TO  355 

460  IF  (X-,97)  485,485.518  _ 

485  IF  ( X  - ,  92  )  490,490,488 

468  IF  (4,  0*X-3.88JL.  553.553i.489.. 

409  PRs4,0*X-3,88 

GO  TO  355 

490  IF  (X-,84)  495,495,493 

493  IF  (3, 75*X-2, 67)  553,553,494 

494  PRs3,75*X-2.67 

GO  TO  555  _ 

495  IF  <  X  - .  75  )  500,500*498 
_ 498_IF  (l,67*X-.90>  553,553,499 

499  PR=1.67*X-,90 
GO  TO  555 

5  0  0  IF  ( X- , 52  >  50  5,505, 503 
503  IF  ( 1 , 0  9*X- , 4  7  >  553,553,504 
50*4  PRs'lV09*X-,47 

GO  TO  355 

505  IF  ( X  -  ,  36  )  5537553,508 

508  IF  ( ,625*X-,235)  553,553,509 

509  PR=.625*X-‘,235 
GO  TO  355 

5i5”lF  (X-,99  )  *52  0 ,5  20,5 1 8” 

5l8  PR=1 

"GOTO  555 

520  IF  (X-,95)  525,525,523 
323  IF  ( 5 i *X»3 i 95  )  553,553,524 

524  PR  =  5 , * X - 3 , 95 _  _  _ _ 

~GO 'TO  555 

525  IF  ( X- , 88  )  530,530.528 

528  IF  ( 4 , * X * 3 i  )  553,553,529 

529  PRa4 , *X-3 .  _ 

GO  TO  555 

530  IFjX-,82)  535,535,533 
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3 IF  ( '?  ,  :>  •  \  - 1  ,  t  .  3  )  553,553,534 

.>  o  '•  P  R  =  ?. ,  P  *  X  -  i  i  6  * 

13  71  5o5 

-3-  !  F  (X-,70)  54C  i  b  4  0  /  is  3  o 
•jj^i  IF  i  1 .  “  V  -  .  n  P  )  553,553,539 
>39  =r<si,3*X-,«2 
3  0  TO  536 

IF  (X-,54)  540,546/543 
IF  <  ,o75*X-.41a>  553,553,544 
544  PR=,375*X-,4i5 
GO  TO  555 

546  IF  (X-,44)  553,553,550  _ 

550  IF  (  ,  5*X« . 22 )  553,553,551 

551„PR=.5*X-,22 _ 

GO  TO  555 

553  PR  =  0 _ _ _ 

555  END 


~  \o ,  ■; 


03/25/68 


5U 

•  i  n  O  U  T  I  \  c 

W  I  Th(  KV 

,  X  ,  PR  ) 

"  o  r 

IF 

(  K  V 

-2) 

56  3, t  9  5 , 

628 

5  o  3 

IF 

IX- 

,95) 

566,568 

#630 

5o6 

IF 

(  V- 

.91  ) 

573,573 

,570 

IF 

l  4  , 

44*  X 

-3,24)  656,658 

571 

PR 

=  4.4 

4  *  X 

-3,24 

no  m  665 

57 '5  IF  (  X  -  ,  a  1  )  576,578,575 
:>  7  6  IF  (3.0*X-1.8o)  658,658,576 
676  PR  =  3,iJ*X-l,86 
GO  Tn  665 

573  IF  (X-./U  583 1 583#  580  .  .  . 

580  IF  (l,5*X-,7l>  658 » 658, 581 

Pbl  PR  =  i  ,  5*X-  ,  71  . .  .  _ 

HO  TO  6o5 

563  IF  (X-,45)  58d,58B,585 
565  IF  (,96*X-,34)  658,658,586 

586  PR=,96*X-,34  _  _ 

GO  TO  665 

588  IF  IX-. 27)  65d, 658,590 _  .  _ 

590  IF  ( ,556*X-,156)  658,658,591 

_ 591  -PR=,556*X-,156  .....  _ 

GO  TO  665 

.....  595  IF  CX-,94)  600,600,630 _ 

600  IF  (X-,89)  605,605,603 
.  603.. I F  (  4  i  0*X-2 , 7.6.1 _ 658, 658i  8.04 _ 

604  PR=4,0*X-2,76 

_  GO  TO  665  ..  .  ._.  .  _ __ _ 

605  IF  (X-,77)  610.610,608 

_ 608-XF  (  2 , 5 * X - 1 , 4 2 5.)  .658,658,60.? _ 

609  PR  =  2 , 5*X-1 , 425 

_  _GO— T O.  665 _ 

610  IF  (X-,66)  615,615,613 

_ 6i3  IF  (1 ,364«X-,554).  658,658,614 

614  PR*1 , 364*X- , 554 

_  GO  TO  665  _ _ 

615  IF  (X-,37)  620,620,618 

_  618  IF  < .d62*X-.221)  658,658,619 

619  PRs , 8o2*X- , 221 

_  GO  ..TO  665 _ _ 

620  IF  ( X - , 1 7  )  658,658,623 

6 2 3. . I F  (  ,  4 0 * X _♦  ,  0. 1_) _ 6 58,658.624 

624  PRs,40*X*,0l 

_  _GO  TO  665  _  _  _ 

628  IF  (X-,92)  633,633,630 

_ 6  3  0  _P  R  =  1  _  _ _ 

GO  TO  665 

_ 633  IF  (X-,86)  638.638,635  _  _ 

635  IF  (3,33*X-2.Q67)  658,658,636 

636  PR  =  3  ,33*X-2 , 067 _ j _ 

GO  TO  665 

_  6 3 8  _ I F_ ( X - ,  6 7  )  643,643,640 _ 

640  IF  (  2 , 143‘’X-i ,  036 )  658,658,641 

641  PR=2,143*X-l,036  _ 

GO  TO  665 

64  3  I FL  (  X -  ,  5 8  L  .6.4.8 , 648 , 645 _ 
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;> ».  -> 

IF 

( : 

,  0  7  1  *  X 

-  ,^ii!  658,658.640 

J  4  O 

r5  ri  s 

:  1 1 

0  71*  X* 

.200 

GO 

l  0 

66*3 

■7  a  a 

IF 

(  X 

-  .26) 

6b8 1 653 , 650 

p  2  r 

IF 

( , 

7  0 1  *  X  " 

•  1  Co)  656,658.651 

651 

?ts  ■ 

i ,  7  0 1  •  X  -  . 

103 

GO 

TO 

oo5 

023 

IF 

(X)  65o, 

6 bo,  655  _ _ 

6(3r 

IF 

(  , 

5H4*X- 

,001)  658,658.656 

obc  . 3o4«X- , 001 
GO  TO  066 

6." 8  PHS 0  _ _ 

6o5  END 
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SUFirtOUriNb  KV  CONS  (OMPHUiKV) 

IF  <DHPr.W-fit  >  ?Q35, 2045,2040 _ _ _  .  ... 

2035  K V s 1 

GO  TO  20  6  0  _  ......  . 

2040  IF  (FMPhR-16,)  2045,2050*2050 
2  0  4  5  *  V  =  2 

GO  TO  2060 

2050  K V  =  3  _ _ -  ...  ... 

2  0  6  0  F  N 3 


FIREFLY  2 


PROGRAM 
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PROGRAM  FIHEF'LY2 

DIMENSION  KC<27, 4) ,  KFR(27#  4,10  >  t  PKN1<2>,  4#  10  )  ,  PRN2<  27#  4, 10) , 

1PRV3 ( 2  7,4, 10 ) , PRN4<  27, 4,  IQ ) ,PRE1(27»  4,10) ,PRE2<  27,4, 10) « 
2PRci(27,4,lO)»PRE4(27»4#lO)#P»Sl(27,4ilO)#PRS2<27,4#10>* 

2PRSj(27,4,10),PRS4(27,4,10),PRWl(27,4,l0)»PRw2(27,4,10), 

4^Rwo ( 27,4, 10  > , PRW4( 27,4, 10  >  #NBN1(27,4,10 ) , N8N2<  27,4, 10 ) , NBN3( 27| 4, 

t»10  )  , NDN4(27,4,10>,NBE1<27,4,10)  ,  NBE2  (  27 , 4 , 10  >  /  NrfEi  (  27, 4 , 10  ) , 

o\Sr4(27,4,10)»NBSl(27,4,10)*NeS2(27,4,10)#NBS3{27,4,10)|NBS4(27|4# 

710>,NdwK27,4,10>,NBW2(27,4,10.)*NBW3(27,4,10)jN8W4(27,4,10), 

6  KRDG(10«)#  ADR1(27,4,1U),AUR2(27,4,10)#PRF(27,4,10), 

9PRB(27.4,10),KR(?7,4,in) , TPSP < 27 , 4 , 10  ) 
COMl'lOiM/BO/PRNl,PrN2»PRN3>PR.N4,P«El,PRfc2*PHE3#P«64,PRSl,PRS2,PRS3, 
1PRS<* ,  PHW1  /P1/PRW2,  PRW3#PRW4,NBNl#NdN2,NtfN3»NBN4,NBEl,NBE2# 
2N8E3,NBE4,NBSliNBS2#NBS3*NRS4,NdWl,N8W2iNBW3*NBW4,KCiKFR#KBDG,PRF, 
3PRB,  AQR1, ADR2#KR,TPSP 
p A N' is ,  (Q),/BQ/,  <1), /B1/,FIRESP. 

C----  KWR I TE  =  l  IF  WANT  INTERMEDIATE  STEPS  WHITTEN  OUT, 

C - OTHERWISE  KWR  I  TE*0 1  ..  .  . . 

KWR 1 TE*0 

READ  10,RANDQM1,RANDOM2_  _  _ 

10  FORMAT  (F6.6,1X,F8'6) 

READ  ..  . . . . 20 1  N _  .  _ 

READ  20, M 

20  FORMAT  (14)  _  _ .  _  _  _ _ 

DO  30  1=1, M 

30  READ  35,  <KC<  I ,  J>#  J«l*4i _  _ ___ _ 

35  FORMAT  (6X,  I2#1X, 1 2 « IX , 12, IX, 12) 

DO  25  1=1,  M  __  _  _  _ 

DO  25  J=l*4 

KK  =  KC  (  I ,  J  )  _ _ _ _  _  __  _ 

IF  (KK,EQ,0)  GO  TO  25 
DO  25  K=1,KK 
KR(I,J,K)=0 

.25. CONTINUE  _  .  _  _ 

READ  26,NUETAIL 

26  FORMAT  (13)  _ _  _ 

IF  (NDETAIL.EQ.O)  GO  TO  48 

_  DO  28  II  =  1,NDETAIL  _  _  _  _ 

READ  2 7 , 1 , J , K 

27  FORM A T.  ( I  2 , IX # 1 1 » IX # 1 2 > 

28  KR ( I , J, K ) =1 
48  WRITE  (6,50) 

50  FORMAT  (1H1,39HGEN£RAL  COMMENTS  ON  FIRE  SPREAD  PROGRAM, /, 1H0 , 4X, 
110HDIRECTlONS#/,lHO,6X,7HlsNORTH,/,lHO»6X#6H2»EAST#/»lHO#6X,7H3»SO 
2UTH,/,1H0,6X,6H4=WEST) 

__WR  I  T  E  (6,60)  RAND0M1.RAND0M2 

60  FORMAT  ( 1HQ , 40HTHE  FIRST  AND  SECOND  RANDOM  NUMBERS  ARE  #F8,6, 

15H  AND_, F8 , 6, 1H • ) 

80  DO  120  11=1, N 

READ  _  110, I, J,K,NBN3( I , J,K) ,NBN4(  J , J,K) |NBE1( l,  J,K), 

1NBE2 ( I , J»  K ) , NBE3 ( I «  J#  K ) ,  NBE4 ( I , j *  K ) , NBS1 ( I ,  J, K  > , N8S2 ( l , J #  K ) *  ' 

2NBS3  (  I,  J,K),NBS4(I«  J>K)>NBWKI,  J,K),KARD3 
110  FORMAT  (1 2# IX, 11, IX, 12, IX, 1 5, IX# 1 5 , IX , J 5 , IX , 15 # IX, 1 5 # IX, 15, IX, 15,' 

_ 11X,  I5,1X,I5,_1X,  1 5, IX,  15, 6X,  ID 

READ  115,IiJ#K#N8W2(I,J,K)iNBW3(I#J,K)#NBW4<I,J,K)'i~ 

JLADR1  ( I  #  J#K ) ,  ADR2(  l  #  Ji  K)  j  CTY1#CTY2#  _  NBNl(J,J,K),NBN2(JiJ#K), 


Q3/25/6& 


•  ;  I  :  if ,  i  v  #  ii  ,lX,I2.1X,I5.1XiIb,lX,l5llX,A6,A6.1X»A6#A6|lX,_ 

I' Vi:.  v,I3,1X.15#2X,I1) 

'  2  *  C '  *  !  s  c 

:'u  n  0  3  M  '*  =  1|’< 

•'0  a'  •  \-'J  =  l,5  .  _ _ _ . _  ... _  .....  _  ... 

"0  122  I =  1  *  M 

n0  1?<£  J  =  l*4  .  .  _ _ _ _  _ 

IF  (KC< i , J) .FQ.Q)  fiO  TO  122 

^  K  s  mT  l  I  <  J  )  . .  _ _ 

00  122  KsliKK 

TPSP( I i J. K  )  =  0  .  0  _ 

12?  0 0 v T I vUc 

1 2 0 1'  no  1320  I  I  =1 ,  K _ 

IF"  (Mil- 2)  120  5*1240*1275  . ~~  '  . .  . . . . 

1205  IF  (Mvl-2  )  1210.1215*1220  _ _ 

1210  READ  INPUT  TaPE  10  *  1212*  KcLE V /RJ /PROB/1  * J, K#  PRNl (I *J*  K  > . 

IPREKI  .  J.K).PRSl(I.J.K). 

1  PWwk  J  ,  j.  K)  »PRF(  I/J.K  )  ,PRN2(  T*  J.K)  ,PR£2(  I  /J#  K  ) ,  PRS2  (  I,  J,K") 

2,PRw2(  I  ,  J,*),PRN3<  1  ,  J, K  ) .  PRE3  (  I  *  J,  K  ) ,  HH!»3  (  I  *  J*  K  ) ,  PRW3  (  I ,  J,_KJ  , _ 

3PRN4  (  I  ,  J,K),PRE4<  J  ,  J,K),PRS4U  ,J,K  >  ,PKW4<  I'/j.K)  "  . . . . ~ 

1212  FORMAT  (/  21X, I2*37X,F4,2,01X,F8,6////////////////// 

13X,I2*5X,I1,6Xi I2,2X,F6,4,2X,F6,4,2X, . 

1F6,4.2X.F6,4,15XiF6.4/21X#F6, 4 , 2X . F6 , 4 , 2 X . F 6 , 4 , 2X * F6 . 4 /21X , F6 , 4 , 
22X,F6»4,2X.F6*4,2X,F6»  4/2lX~,  F6~,  4, 2X  *  F  6  ,~4 , 2X  *  F  6 , 4  /2X ,  F6  ,4 ) 

GO  TO  1310 

1215  READ  INPUT  TaP6  1 0  *  1217 ,  K£Lt  V  *  R I ,  PROBVl  /J  *  K ,  PRN1  (I  '/J,  K  ) 

1PRF1( I* J,K),PRSl< I* J.Ki, 

1  PRW1(  I  ,  J,K)«PRF(  I,  J#K)’,PRN2"(T*  J»K>  ,PKb2(  I  i  J,K)  ,PWS2(  J  ,  J,K) 

2*PRW2( I # J.K) ,PRN3C I »  J*  K ) . PRE3 ( I , J* K ) , PRS3 C I , J* K ) , PRR3 { I , J, K ) , 

3PRN4( I . J,K),PRc4< I*J*K),PRS4( I  * J, K ) *  PR W4 ( I , J , K >  ’" 

1217  FORMAT  (//  21X, I  2  * 37X, F4 , 2 , olX, F8 , 6/  //////////////// 

13X,  I2.5X,  U,6X,  I2,2X,F6t4#2X*F6,4»2X,”'  "  . . . 

1F6|4*2X*F6»4,15X*F6|4/21X|F6,4#2X»F6I4|2X.F6,4*2X*F6»4/21X»F6I4| 
22X*F6,4,2X*FA,4,2X*F6f  4/21X,F6\4,2X*  Ft>.  4, 2X,F6, 4, 2X.F6 ,4) 

GO  TO  1310 

'1220' IF  (NM-4  )  1225,1230*1235  '  ”  . . .  ~  '  *'* 

1225  READ  INPUT  TaPE  10 , 1227,  KELEV  ,  R  i ,  P_RU£,  I ,  J,  K,  PRNi  <  I ,  J,  K  > , 

"IPREKI,  J.K)  *>RS1<  I/J.K),  . . . . 

1  PRW1(  I  *  J,  K  )  *  PRF  <  I,  J»K),PRN2(I» J,K),PRE2<  J*J,K),PRS2<  I,J*K) 

2*PRw2(  I  *  J.K)  ,PRN3<  'I.  J#K).PRE3fI,  J»K),PRb3(  I ,  J,K)  /PRW3(  I,  J,K) , 

3  P  R  N  4  (  I,  J,K),PRb4(J,  J,K),PRS4<  I ,  J,  K  ) ,  PRW4  (  I ,  J,  K  > 

1227  FORMAT  <///  . . 21X/1  2 , 37X ,  F4',  2, 6lX,  F8 , 6/  ////////////// /~ 

13X, I2.5X,  11, AX,  I2.2X,FA,4,2X,F6,4,2X, 

1F6 ,4,2v ,Fe,4ll5X.F6.4/21X,F6,4,2X,F6lV/2X,F6,4,2X#F6,4/2lX,F6.4, 
2?X,F6,4, 2  X.F  6.4. 2X.F6, 4_/2lX,F6^4, 2  X,  Ft), _<*,2X,F6, 4, 2X.F6, 4) 

GO  TO  1310 

1230  READ  INPUT  TAPE  10 , 123P, KELEV, Rl , PROS, I , J, K , PRNl < I , J, K ) , 

1PRE1U.  J,K),PRSl(I,J,K>. 

1  PRWi ( I. J,K).PRFCI, J.K),PRN2<I#J,K),PRE2( I » J,K),PRS2( I,J,K) 

2.PRw2(  I  ,  J,K),PRN3(  I,J,K),PRE3(  I,J.K),PR5>3(  I,J,K)  ,PRW3(I/J#K)  , 

3PRN4< I, J,K),PRE4< I.J.K),PRS4< I,J,K),PKW4(I,J,K> 

1232  FORMAT  (////  21X,  I2.37X,F4,2',61X.F8,6/  ////////////// 

13X, I  2 , 5  X  ,  1 1 , 6X , I2.2X,F6,4#2X#F6,4.2X, 

1F6,4,2X#F6,4,15XiF6,4/?1X,F6,4,2X.F6,4,2X»F6,4#2X,F6.4/21X.F6,4| 
22X.F6.4,2X,F6.4t2X.F6,4/21X,F6,4,2XiF6.4i2XfF6, 4,2X,F6.4) 
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RC  TO  1310 

12  3^  KfcAD  INPUT  Tape  iJ»l?37,KELbV,RI,PRUB,I,J»K,PrtMU#J#K), 

1 PRE 1  <  I  ,  J,  K  )  ,  ?iiSl(  I*.  J.K)  , 

1  PK'^K  I  ,  J,  K>  .PKF  <  I  .  J.K)  ,PRK2<  I  #  J.K)  ,  Ph£2{  I  ,  J.K),PRS2<  f,  J#  <) 

2.PR.v?{I,J,K)lPRN3(I,J»K>.PRfc3<I»J,K),PHb3<I,J,K)#PKW3(I,J*K), 

3PRV4n,J,K),PRb4(I»J»K),PRS4<I,J,K),PKW4<i.J,K) 

1237  FORMAT  </////  21X,  I  2 . 37X , F4 , 2, 61X , F8 , 6/  /////////// A/ 

13X.I2.&X, U.6X, I2»2X,F6I4#?X,F6,4,2X, 

1F6I4,2X,F6,4I15X,F6,4/?1X,F0I4,2X,F6I4,2X,F6,4,2X,F614/21X,F6,4, 
22X,F 6, 4,2X,F6.4,2X,F6,4/21X,F6,4(2X,F6,4,2X#F6,4,2X,F6#4) 


GO  TO  1310  _  _ 

1240  IF  (MN-2)  1245. 1250  , 1255 

1245  READ  INPUT  TAPE  1 0 . 124 7 , KEL E V , R i , PROB , I , J , K , PRN1 <1 , J , K ) ,  _ 

1 PRE 1 ( I , J.iO  ,PRSl< I » J#K ) . 

1  PR Wi< I , J,K).PRF( I. J,K),PRN2< I. J.K) , PR£2 (I . J, K ) , PRS2 (  I,  J,K) 

2.  PRp2(  I  ,  J.K),PRN3(  I.  J.K).PRE3(  I.  J,K),PR53<  l , J , K ) , PRP3 (I , J, K ) , 

3PRN4 ( I , J.K  )  ,PRS4t I , J , K ) , PRS4  < I , J, K  ) , PKW4 ( I . J.K ) 

1247  FORMAT  (//////  21X,  I2,37X.F4,2,61X,F8,6/  ////////>///— 

l3XiI2#5X.ll.6X»I2f2X.Fftl4#2X«F6»4#2X, 

‘ 1F6,4|2XiF6i4,15X.F6.4/21X.F6,4.2X.F6|4,2X.F6,4.2X.F6,4/21XiF6i4| 

22X»F6|4.2XiF6|4,2X.F6|4/21X.F6»4}2X»F6»4<2X|F6»4#2X|F6|4>  _ 

GO  TO  1310 

1250  RE  A  J  INPUT  TAPE  10.1252. KELEV.Rl.PRUB. I. J.K, PRNKI.J.K), 
lPREl(I.J.K).PRSKI.J.K)# 

1  PR wit  I.  J,K).PRF( I,  J,K),PkN*U,u»K) ,PkC2  I  I , J# K ) , PRS2 (I , J, K ) 

2  «  PR*2  <T#  j .  K  >,  PRN3  U  #J  *  K  >#  PRE3  <  T»  J.K  >,  Pk!>3  ( 1  #  J  #  K  )  ;pRit3‘<  I  #"J#  K)"#" 

3  P  R  N  4 ( I , J,K) ,PRE4< I , J.K) ,PRS4< i , J.K) ,PKW4 ( I , J.K) 

1252  FORMAT  (///////  '  21X. 1 2. 3/X, F4 , 2 . 61X * Fb , 6/  ‘  /////////// 

13X. I2.5X* I1.6X, I2,2X,F6t4,2X.F6,4.2X# 

1 F  6  i  4 , 2  X  .  F  o  ,  4 . 1 5 X «  F 6  *  4 /  2 1 X  *  F  6 . 4 »  2 X »  F 6 , 4 . 2  X  #  F  6 , 4  »  2 X .  F 6  i  4 / 2 1 X,  F 6 , 4 , 
22X,F6l4,2X,F6i4.2X.F6|4/21X.F6l4*2X#F6,4|iJX|^6|4|2X/F6,4) 

'  GO  TO  1310 

1255  IF  <  NN-4 )  1260,1265.1270 

"1260  READ  INPUT  TAPE  10 . 1262 , KELE V , R \ , PROB , I , J , K , PRN1 { I , J, K ) , 

1PRE1( I,J,K),PRSl< J,J,K>, 

1  PNW1<IIJ,K),PRFU,J,K>,PRN2(I,J,K),PRE2(I,J,K),PRS2(J7J,K-)- 

2.PR><2(  I ,  J.K)  ,PRN3(  I ,  J.K)  .PRE3<  I »  J, K  ) ,  PR33  <  I  ,  J.  K  ) ,  PRW3  (  I ,  J.  K  )  , 

"  *'3PRM<  I,J,K),PRE4(I,J,K),PRS4(I,J,K),PRW4(  I.J.K)  . 

1262  FORMAT  (////////  21X, I2,37X,F4,2,6lX,Fb,6/  ////////// 

13X, 12, 5X, U.ftX, I2,2X,F6,4.2X,F6,4<2X,  . 

1F6i4,2X,F6,4,15X,F6,4/21X,F6,4,2X,F0i4,2X,F6,4,2X,F6,4/21X.F6 ,4. 
22X,F6,4,2X,F6,4,2X,F6t4/2lX#F6f4.2X,F6,4,2X,F6.4,2X,F6,4) 

GO  TO  1310 

“1265'  READ  INPUT  TAPE  10 . 1267 ,  KELtV ,  R  J , PROB ,  J  ,'J ,  K, PHN1  <  I',  J/K ) ,' 

_  lPRElU.J,K),PRSl(I,J,K). 

1  "  "  PRWlt  I  ,  J,K>,PRF(  I ,  J,K),PRN2U,  J,K>  ,PRfc2(  f,  J,K),PRS2(  I  /J'/K)- 

2,PR*2< I, J,K),PRN3( I, J,K),PRE3C I ,  J, K ) ,PRS3 <  I  , J,K),PRW3<I, J.K), 

3PRN4  (  I ,  J,K>  ,PRE4(  1 ,  J.K)  ,PHS4(  I  ,  J,K>  ,PRW4(  I  ,  J.K)  "" 

1J.67  FORMAT  (/////////  21X,  i2,37X,F4,2,61X,Fb,o/  ///////// 

13X,  I2.5X,  U.'fiX.  I2.2X',F6i4,2X,F6,4,2X,  *" 

1F6,4,2X,F6,4,15X,F6, 4/21X , F6 , 4 , 2X, F6 , 4 , 2X , F6 , 4 , 2X , F6 , 4/21X , F6 ,4, 
"22X,F6l4#2X,F6,4.2Xf F6I4/21X#F6,4,2X#F6I4,2X,F6,4,2X,F6,4> 

GO  TO  1310 

127  0  RF  AD  I  NPUT  TAPE  10,1272,  K£ LEV,  R l , PROB,  I  #  J,  K ,  F RN1  ( I  ,~J» K  ) 7 
1PRE1^U,J,K>,PRS1(I,  J.K), 

1  .  ““'PHWK  I,  j#K),PRF<  I,  J,K),PRN2(I,  J,K),PRE2(I,J,K),PRS2(  I,  J.K) 
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2  ,  P  R  *  2  (  I  #J»K),PW\3(  I  ,  J »  K  )  »  P  R  fc  3  £  I , J,K>,PRb3(  I  ,  J ,  «  ) ,  PR*3  (I ,  J,  K ) , 

3PRK4 ( ! • J, ri ) ,PKE4( I . J.K) »PRS4( I , J,K  >  ,PHW4( 1 , J* K > 

*  <  1272  FORMAT  (//////////•  21X#  I2,37X,F4,2,61X,Fe,6/  //////// 

13X,  I2»5X.  U,6X.  12,2X,K6,4,2X,F6,4,2X, 

1F6,4#2X*FC,4I15X,F6.4/?1X#F6I4#2X«F6I4>2X#F6,4,2X#F6,4/21X#F6I4, 
22X,F6, 4,2XiF6,4,2X,F6,4/21X#Fo,4,2X,F6i4,2X,F 6,4,2X,F6,4) 

r,0  TO  1310 

1275  IF  (M-2)  1280,1285, 12‘»0 

1280  READ  INPUT  TAPE  10 , 12b? , KELEV , R I , PRUB, I , J, K , PRN1 ( I , J, K > , 

IPREl ( I , J  O ,PRSl( I , J,K) . 

1  P^lil  ,  J,K),PRF{  I  .  J»K)  ,PRN2(  I#  J,K)  ,PH62(  I ,  J#K)  ,PKS2{  ! ,  J,K  ) 

2»PRw2(I* J#K),PRN3< I* J#K) ,PRE3< I  * J#KJ,PRb3( I , J#K),PRW3( J , J,K), 
3PRM4CI#J,K),PRE4(I»J*K)#PRS4(I.J,K),PKW4(I#J<K) 

I2a2  FORMAT  {///////////  21X,  I2,37X,F4,2#6lX,FBf 6/  /////// 

.....  13X,  12, 5X,  U,6X|  I2,2X,F6, 4 , 2X, F6 , 4 , 2X, 

lF6,4,2X,F6,4,l5X,F6,4/21X,F6l4,2X,F6,4<2X,F6,4,2X,F6,4/21X,F6t4# 

2?X|F6|4|2X#F6»4»2X,F6I4/21X|F6|4#2X#F6,4I2X#F6|4*2X#F6|4)  _  __  _ 

GO  TO  1310 

_ 1285  READ  INPUT  TAPE  10 , 1287 , KELEV , R J , PRUB , I , J, K , PRN1 ( I , J, K ) , _ 

IPREl (  I #  J, K  )  , PRSl ( I , J, K  > , 

_ 1  __  PRWK  I  ,JiK)iPRF(  J,  J»K).PRN2(I»J#K)»PKE2(I,J#K>,PHS2(  I,  J,KJ_ 

2,PRW2U,  J»K),PRN3(  I,  J,K)»PRE3(  I,  J,K),PRS>3(  J ,  J#K),PRW3(J,  J,K) , 

_  3PRN4<I#J#K),PRE4<I#JiK)»PRS4CIiJ.K)»PRH4(I#J»K>  _  _ 

1287  FORMAT  (////////////  21X< 1 2 , 37X , F4 , 2 , 6lX , FB , 6/  ////// 

_ 13X,  I2,5X,  U,6X,  I2,?X,F6t4,2X,F6,4,2X, 

lF6,4,2X,Fo,4,l5X,F6,4/21X,F6,4,2X,F6,4,2X,F6,4,2X,F6,4/21X,F674y 

_ _ _ 22X,F6,4(2X,F6I4,2X,F6I4/21X|P6,4,2X,F6I4,2X,F6I4,2X,F6I4>  _ 

GO  TO  1310 

_1290  IF  (NN-4)  1295,1300,1305 

1295  READ  INPUT  TAPE  10 , 1297 , KELEV , R I , PRQB, I , J , K , PRN1 ( I , J, K ) , 

_ .1PRE1U,  J,K),PRSl(I,  J.K). 

1  PRW1(I,J,K),PHF(  I,J,K),PRN2U,J,K),PKE2U,J,K),PRS2(  l/j,Kr 

__  _  2.PRW2(I,J,K),PRN3U,J,K),PRE3(  I , J, K > , PR83  ( I ,  J , K  ) , PRW3 < 1 # J, K ) , 

3PRN4<  I, J,K),PRE4( I, J.K) ,PRS4( I , J, K ) , PRW4  ( 1 ,  J, K ) 

_ 1297  FORMAT  (/////////////  21X, I2,37X,F4,2,61X,FBt6/  ///// 

13X, I2,5X, U.6X, I2,2X,F6I4,2X,F6,4,2X, 

_  lF6,4,2X,F6,4,l5X,F6,4/21XlF6,4,2X,F6t4l2X,F6,4,2X,F6,4/21X,F6,4< 

22X,F6,4,2X,F6,4,2X,F6,4/2lX,F6,4,2X,F6,4#2X#>’6,4|2X,F6,4) 

_  GO  TO  1310 

1300  READ  INPUT  TAPE  10 , 13 0 2 , KELE V , R I , PROB , I , J, K , PHN1 ( I , J, K ) , 

_ 1PREK  I  ,  J.K)  ,PRSl<  I,  J,K)  , 

1  PRWl(  I,J»K),PRF(  I,J,K).PRN2U,J,K)|PHE2(I,J,K),  PRS2(I  ,’JV’K  )' 

_ 2,PRw2(  I  ,  J,K)  #PRN3(  I ,  J,K)  ,PRE3(  I  ,  J,K),PRb3(  I  ,  J,K),PRW3j  J  , ,  J,K) , 

3PR6i4(I,J,K>,PRE4CI.J#K>,PRS4(I,J.K>»PKW4(I#J*K)‘ 

13Q2  FORMAT  (//////////////  21X, I2,37X,F4,2,61X,FB  ,6/  //// 

13X, 12, 5X, I1,6X,I2,2X,F6I4#2X,F6,4,2X, 

_  1F6I4#2X,F6,4(15X,F6I4/21X,F6,4,2X,F6,4#2X,F6I4,2X,F6,4/21X,F6,4# 

22X,F6,4,2X,F6.4,2X,F6, 4/2lX,F6,4,2X,F6(4,2X,F6,4,2X#F6,4) 

_  GO  TO  1310 

1305  READ  INPUT  TAPE  10 , 130  7  ,  KELEV  ,  R I ,  PRUB,  I ,  J,  K  ,  PKN1U  /J,  K  > , 

1PREKI.  J,K),PRSl(I,J,K>, 

1  PRW1(  I ,  J,K),PRF(  1 ,  J,K)  ,PRN2U,  J,K>  ,PRE2(  I ,  J,K)  ,PKS?{  I,  J,K) 

_ 2 ,  PR*2  £ I »J,K) ,PRN3< I ,J,K) , PRE3(  I,J,K),PRS3( I,J,K),PRW3( I,J,K)« 

3PRN4(I,J,K),PRE4<I«J*K),PRS4(I,J#K),PRW4(I,J,K)  '  “ 

_  1307  FORMAT  (///////////////21X, I2,37X,F4,2,61X,FB,6/  /// 

13X, I  2 , 5X ,  I1,6X,I2,2X,F6|4|2X,F6|4,2X|  "  .  . 
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lr6,‘*/2X,Fo,4,l5X,r6.4/?lX,F6,4,2X,Fol4,2X,F6i4,2X,F6,4/21X,F6,4, 

2?X,F6i4,?X,Fai4i2X,F6,4/21X«F6,4,2X,Foi4i2X,F6,4,2X#F6,4) 

1  3  1 .  P  R  H  (  !  ,  J  ,  *  )  s  R  R  0  R  ■  ....  _ 

x  0  2  it  L-  0  V  i  i  '•  U  u 

no  oC7  JJS1,1C0  ....  _  _  .... _ 

OO  127  I=1,X 

no  127  JS1.4  .  _  ..  _ 

IF  ( KC C I. J) ,EQ,0 )  GO  TO  127 

K  K  =  r\  C  (  I  ,  J )  _  . .  _  _ _ 

DO  123  KS1 »  KK 

125  KFR(  I  ,  J  ,  K  )  =  0  .  _ 

127  CONTINUE 

MIMTPF  =  C  _  _ _ _ 

\'COuMT  =  C 

V  T  0  T  A  L  s  0  _  _ _ 

IF  (KWHITe.EO, 0 )  GO  TO  132 
WRITE  (6,130) 

130  FORMAT  ( lHl  i  1 19HBL0CK  D1REC"  ""LOT'  “  ADDRESS  'FIFTH  THERMAL" 

1  FOURTH  SPREAD  FIRST  BURN  PROBABILITY  2ND  FIRE  _  FIRE  CAU 
2GHT/1h'Vbx#H1HTI0N  MO i  ~  RANDOM  “  PULSE  RANDOM  "' 

3PR0BAB-  RANDOM  MOM  SPREAD  RANDM  FROM  BLDG  _/lH  _ 

4  34X ,  6HNUM6ER , 11X, 6HNUM8ER, 2X,15HIL I TY  NUMBER ,  20  X#'5'HNUMB,'»  9X", 

311HBLK  DIR  LOT)  _ _ _  _ _ 

KPAONTNS3 

CJ1---_THERMAL  PULSE  CONSIDERATION _ 

132  DO  160  1=1,  M 

DO  160  J  =  1 , 4  _  _ 

IF  (KC< I, J) ,EO, 0>  GO  TO  180 

_ KK  =  KC  (  I  ,  J )  _ _ _ _ _ 

DO  180  K=1 , KK 

_RANDOM5=RANDOM1*RAN0OM2 _  _  _  _  _ 

‘IF  (RAND0M5-1 , )  150,140,140 
140  RANDOM5=RANDOM5-1, 

150  IF  (PRBU,  J,K)-RAND0M5)  170,170,160 
160  KFR(I,J,K)=3 

IF  (KR( I, J,K) ,EQt0>  GO  TO  165 
TPSP  (  I ,  J,K)=TPSPU,  J,K)*1, 

165  NUMTPF*NUMTPF>1‘ 

ntotai=ntotal*i 

KBDG ( NUMTPF ) s I *10  0  0*J*100*K  . .  . . 

170  RAND0M1=RAND0M2 
RANU0M2=RAND0M5 
180  CONTINUE 

C - 'IF  THERE  ARE  NO  FIRES,  THERE  IS  A  JUMP  "TO  THE  END  OF' THE  PROGRAM 

IF  (NUMTPF.NE.O)  GO  TO  200 

"  WRITE  "(6,190)  ’  '  ~ 

190  FORMAT  (1H0,18HTHERE  ARE  NO  FIRES) 

"WRITE  (6,195) 

195  FORMAT  (5lX,3H  0,47X,3H  0) 

GO  T 0  "8 0 7 

c  — —  THE  FIRE  SPREAD  CONSIDERATION  IS  INITIALISED  AT  ONE  OF  THE 
C----  BUILDINGS  WHERE  THERMAL  PULSE  FJRfc 
200  I=KoDG(l)/1000 

NTH  =  KBI)G(l)-(  1*1000  ) 

JsNTH/100 
'  K  =  NTH-(  J  *  1 0  0  *>  ~ 
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\ 


\ 


V\3 . 


^AVLiO>KsAt3S(HAMDOMl-RAMDOM2) 

VuMSPsO 

no  660  LLLsl,  \IUMTPF 
KSPricAHsO 

IF  l<«<»|Te,eQ,0)  GO  TO  24  0 
IF  (KPAGMTN-60  )  220,220,210 

210  WRITE  (6,130)  .  ..  . 

K  P  A  3  N  T  N  s  3 

220  wc  t  TF  <a,230)  I,J,K,ADRKI,J.K),ADR2(I ,  J ,  K  ) ,  RANDOMS,  PRB  (  I ,  J,  K  )  , 

IP,  v  '*(•■  RAND0M1, RANDOM?, CTY1.CTY2 

(1H0.2X,  12, 5X,  U,5X,I2,3X,A6,A6,2X,F6,4,3X,F6,4,2X,F6,4, 
i*,Fo,4«19X,F6.4,3X,3HYES/1H  ,20X,2A6/1H  ) 

,\aAG\T')»i<PAGNTN*4 

r----  "his  J0r>  IS  gone  THROUGH  FOR  ALL  THE  BUILDINGS  ON  FIRE  TO  SEE  IF 

The  FiHE  SPREADS  TO  OTHER  BUILDINGS  .  _  _  _ 

240  DO  640  I  1=1,16 

RA\D0iM4saBS(RAND0M2-RAND0M1) _ _ _ 

random 5*ra no omi*random2 

_  _  .  IF  (RAN DOM 5-1, )  260*260*250 _ _ _ 

250  RAND0M5=RAND0M5-1, 

_  260  .IF  (  1  1 -2  )  270*280, 290 _ 

270  PRsPRNl ( I , J,K> 

_  N3LDG*N8N1(I,J*K> _ 

GO  TO  500 

_ 28Q..PR  =  PRN2(  I  » J,K>  _ _ 

NBLDG  =  NtlN2(  I ,  J,K) 

_ 50  TO  500  ..  .  _ 

290  IF  (  I  I  -4  )  300,310,320 

_ _ .300  PR  =  PR\3( I , J*K)  _ 

NBLDG=N9N3( I , J,K) 

_  ..GO  TO  500  .  . 

3lC  PR=PRN4( I , J,K) 

__  .  _\BIDG«NBN4<I,J,K)..  . 

GC  TO  500 

_  320  IF  (I  1-6)  330*340, 35J)_ 

330  PPsPREK  I ,  J,K) 

_ _  f,duDG  =  Nwr\I  _ 

50  TO  500 

_  _ 343  PR  =  PRE2( I . J,K)  _ 

NBLDG=NB£2< I, J,K) 

_  GO  TO  500  _  _ 

350  IF  ( I  I -8  )  360,370,380 

_ 360._PRS?RE3(  I ,  J,K) _ 

NBLDG=NBE3< I , J»K> 

GO  TO  500  _ 

.  %  370  PR=PRE4( I , J,K) 

1 _ _  NBLOG  =  N0E4_(  I,J,K) _ 

GO  TO  500 

_ 360  IF  (  1  1-10  )  390  1  40 0i_4lQ 

390  PR=PRS1(I*J,K) 

_  _  V8LDG  =  NBS1( I , J,K> _ 

GO  TO  500 

400  PR  =  PRS2 ( I »  J, K ) 

NBIDG=NBS2<I, J,K> 

_  GO  TO  500 

410  IF  (11-12)  420,430*440 
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420  PRsPRSid.J.K)  .  ...  _ _ 

'■BLDG  =  N6SJ(  I  ,  J  .  K  ) 

KO  TO  *00  ■  _ 

430  PR=PRS4( I , J, K) 

X8LuGsNUS4(  I  i  J*  K )  .  . .  . . . 

GO  TO  500 

440  IF  (11-14)  450,460.470 
450  PRsPHrtKI,  J.K) 

VBLDG=N8W1< 1 ,J,K> 

GO  TO  300 

460  PRsPRW2(  I  ,  J,K)  _  .  _ 

\blDG  =  \8W2<  I  ,  J. K  ) 

GO  TO  300  _  .  _ _ 

470  IF  (11-16)  480.490,490 

_  460  PRsPRw3(  I ,  J,  K)  _ _ _ 

NBLDG=NBW3< I  ,  J.K  > 

GO  TO  500  _ 

490  PR=PRR4(I , J.K) 

_IF  CKFR(I,  J,K>,EQ,3)  GO  TQ  495 _ 

KFR(I#J,K)=2 

495  MBLDG*MBW4 (  I  ,  J.K)  _ 

500  NBLK=NBlDG/10Q0 

_ NTHsNBLDG- < NBLK*1000 >_  _  _ _ _ 

NDIR*NTH/100 

_\'LOTs\Th-(\DIR*100)  _ _ _ _ 

IF'  (NdLDG'.NE.Q)  GOTO~5lO 

GO  TO  610  _  _ 

c - USE  MONTE'  CARLO  METHOD”  TO  SEE  WHETHER  FIRE  MAY  SPREAD 

5l0  IF  (PR-RANDOM 5)  610.610.520  _  _ 

----  USE  MONTE  CARLO  METHOD  TO  SEE  I F  BUI LDING  CATCHES  ONCE  FIRE 

-  EXPOSED  TO  BUILDING  _  _ 

520  IF  (PRF(NBLK,NDIR,NL0T)-RAND0M4)  610,610,330 

530  IF  (KFR(NBLK,NDIR«NLOT) ,EQ,0>  GO  TO  535  _ _ 

GO  TO'  610 

535_KFR(NBLK,NDIR,NL0T)S1  _  _ _ 

IF  ( KR ( NBL  K , ND I R , NLOT ) ,  EQ ,  O')  GO  TO  336 
TPSP(NBLK, NDIR,NL0T)sTPSP(N8LK,  ndir,nlot>»,ooi 
5 36  NUMSPsNUMSP*l 
_NTOTAL=NTOTAL*1 
'  KBDG(NTOTAL  )=NBLDG  " 

53a  IF  (KWRITE ,60, 0 )  GO  TO  610 

539  IF  (KPAGNTN-60  )  550 1 550  #  540 

540  WRITE  (6.130)  _  _ 

’KP  AGNTN  =  3 

550  WRITE  (6.560)  NBLK. ND I R 1 NLOT, ADRl ( NBLK , ND I R . NLOT > . ADR2 ( NBLK , ND I R . N 
1LOT ) .RANDOMS, PRB( NBLK, NDIR, NLOT ) , R AND0M4 , PR, RANQOM1 , PRF ( NBLK , ND I R, 
2NL0T) .RANDOM2, I , J, K , C TV1 , CT Y2 

56  0  FORMAT  (1H0,2X,  I2,5X,U,5X,  I2,3X,A6,A6,2X,F6»4,3X,F6,4,2X,F6,4,'2X~# 
lF6t4)3X,F6>4,7X.F6.4,6X,F6.4,3X,3HYES,4X, I2,2X, Il,3Xi J2/1H  ,20X, 

2 2  A  6  / 1 H  )  ‘  ~  “  "  . . . 

KPAGNTNsKPAGNTN*4 
6 1 0  ~  I  F  (  I  I  ,\E  ,  16)'  GO  "TO  630 
NCOJNT=NCOUNT*l 

IF  ( NCOUNT-NTOTAL)  620,690,690 
620  NCNT*NCOUNT*l 

' I=KBDG(NCNT)/1000  ~  '  ' 
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\TW  =  Kril)G<NCNT)-< 1*1000) 

JsV TH/100 
KsNTH-( J*100) 

c - MOTAL  IS  TOTAL  NO.  OF  BLDGS  WITH  F I  Rfc  (RUNNING  TOTAL) 

c -  this  is  roth  thermal  pulse  fire  and  spRtAU  fire 

630  RANDOM 15RANDDM2 
RAND0M2sRAND0M5 
640  CONTINUE 

650  IF  (KSPREAD,EQ,0)  GO  TO  660 
GO  TO  670 

660  IF  (LLL-NUMTPF)  680,670,670  . 

670  LLLS1 

KSPREAD  =  1 _ .  _ _ _  _ _ 

GO  TO  240 

680  CONTINUE  __  _ _ _ 

690  IF  (NN-2)  6805 i 6810 i 6815 

6  8  0  5.  H  I  *  ,  1  _  _ _ _ _ 

GO  TO  6835 

_ 6010..  R I  ?  .  3 _ 


GO  TO  6835 

_  6015  _  I F  (NN-4)_6i20J.6825iA83Q _ 

6020  HI»,5 

_  GO  TO  6835 _ 

6025  R  I  s , 7 

_ GO  TO_6d.35 _ 

6630  R  I  s , 9 

__6035__I F  (Mh-2)  6840 1  6845i 685Q _ _ _ 

6840  KELEVS30 

_  _.GO  TO  695 _ _ _ 

6045  KELEV=10 

_  .  ...GO  TO  695 _ _ _ _  _ _ _ 

6050  KELEVS5 

_ 695_  I F  (KWWIT6.EO.O)  GO  TO  _7  0  5 _ _  _  _ _ 

WRITE  (6,700)  KELEV,RI 

_ 70  0  .FORMAT  <1H1,3X,32HSUMMARY  WITH  ANGLE  OF  ELE  V  AT  I  ON* ,  1 2 , 24H  AND  ROOM 

1  IGNITION  PR08*,F4,2/1HO»29HBLOCK  DIR  LOT  TYPE  OF  FIRE) 

_ _GO  TO. 700  .  _  . . .  . . .  . 

705  WRITE  (6,706)  KELEV,RJ,JJ 

_ 7Q6  FORMAT_(1HO,32HSUMHARY  WITH  ANGLE  OF  ELEVAT I ON= , I  2, 24H  AND  ROOM  IG_ 

IN  I T I  ON  PRQB*,F4,2,43H  WITH  THE  NUMBER  OF  TIMES  THROUGH  THE  LOOP* , 

_  2!3,11X) _  _  .  __  ...  _  _ _ 

C— --  BELOW  IS  THE  LOOP  WHICH  GIVES  A  SUMMARY  OF  THE  BLOCK,  DIRECTION 

C----  LOT  NUMBER  OF  THE  BUILDINGS  WHICH  CAUGHT  ON  FIRE, _ 

708  DO  790  1*1, M 

_ DO_705  J* 1 , 4  _  _ 

IF  (KC(I,J),EQ,0)  GO  TO  785 

_  _K  K  «  K  C  (  l  j_J  ) _ 

7l0  DO  770  K*i,KK 

_ I F _ ( KFR ( I , J, K ) , NE , 3 )  GO  TQ_73_g _ 

IF  (  KWR 1 TE  i  EO , 0 )  GO  TO  770 
715  WRITE  (6,720)  I , J, K  _ 


720  FORMAT  (1H0,1X,I2,5X,11,4X,I2,2X,13HTHEHMAL  PULSE) 

GO  TO  770  _  _  _ _ 

730  IF  ( KFR ( I i J , K ) i NE , 2 )  GO  TO  770 

_  IF  (KwRJTE.EOx.0)  GO  TO  770  _ _ _ 

735  WRITE  (6,740)  I,j#K 
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70  FCH'-'AT  QH0,1X,I2,5X,J1,4X(J2,2X#6HSPHEAD> 

77"  CONTINUE 
70w  r; o v t i \ u b 
7  9  ■  CGMIvUc 

K  P  A  ;j  V  T  \  =  C 

300  IF  (NTOTAL.NF.O)  GO  TO  801 
M  U  '*  S  P  =  0 

301  WHITE  <6,oQ5)  NUHTPF.NUHSP.NTOTAL 
bQ5  FORMAT  ( 1 M  ,‘jQHTOTAt  NUMBER  OF  13LDGS  ON  F I  HE  FROM  THERMAL,  PULSE*  # 

1 1  3 , 4  X ,  43HT0TAL  NUMdER  OF  BLDGS  ON  FIRE  FROM  SPREAD*  ,ld,4X, 

221HT0TAL  BLDGS  ON  FIRE*  # I  3 «  4  X  >  _ 

606  IF  ( NDET  A  IL , EQ  i  0  >  GO  TO  807 

IF  ( JJ , NE  ,  10  0  )_G0  _T0  807 _ _  _ _  _ 

DO  oO 7  1*1, M 

DO  807  J *  1 , 4  _  _  _  _ _  _ 

KK*KC< I , J) 

_ IF  (KK.EQ.O)  GO  TO  807  _  _ _ _ 

DO  807  K *  1 , KK 

_ IF  (KR(  1 , J,K)  ,  E  Q  ,  Q  )  GO  TO  8Q7 _ _ 

KTP=TPSP( I , J,K> 

_RKTP  =  KTP  _  _  .  _ 

K  S  P  =  (  T  P  S  P  (  I ,  J »  K )  •  R  K  T  P  )  *  1 0  0  0  i 
KTOT=KTP*KSP  _ 

WRITE  (6,6061) 

8061  FORMAT  <1H1,3X,19HBUILDING  DEFINED  8Y,7X,  31HNUM8ER  OF  TIMES  IN 

1100 'CASE  RUN  /1H  #3X,  18HBL0CK  SIDE  . LUT  ,8X,  28HBUILDING  CAUGH 

_ 2T  ON  FIRE  FROM  /1H  ,  29X,  32HTHEHMAL  PULSE  _  SPREAD  J°TAL_/ 

31H  ,3X,  ,3 X,  4H-““-  ,3X,  3H"”“  ,8X,  ,4X» 

4  ,  4X ,  5H . )  _  _  _  _ _ 

8060  WRITE  (6,8065)  I , J, K , KTP , KSP . KTQT 

8065_FORMAT  (1H  , 5X , 1 2 , 6X , 1 1 , 5X, I  2 , 14X , 1 3# 10 X, 1 3 , 6X, l 3  ) _ 

TPSPU  ,  J,K)*0,"0 

807  CONTINUE  _ 

'  808  REW  I  ND  IO 

810  REWIND  27 _ 

STOP 
END 
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r  l''“h  v'  ,j 

;  w  V  A  S  -  C  1  -J  )  ,  A  T  p  F  a  n  0  }  #  K  b  P  K  ( 1  0  0  >  #  K  U  I  f  T  P  <  1 0  o )  #  K  u  I  F  s  p  ( 1 0  0  )  , 

i  o..  ''  s  .  0  .  )  *  A  S  C.  I)  p  (  lu  u  ) 

- :  . :  i  =  i » :  -j 

:  '  I  -J  ,  a  bK  I  p  (  I  ) 

1 ')  r  Cl  ~  (IP) 

REA  20  »  \  »CTV1,  CTY2.  W  IN.D1*  W1MD2 
20  FOP, ''AT  < i4,lX,2A5,lX,2A6) 

WRITE  (6,2b)  CTY1,  CTY2,WlNDl»Wl.\D2fN 
25  FOP:  AT  ( lnl , ?9 X, 2A5*14X#2A6/lhO# 64HPRUB  RUOM  ANGLE  OF  AVG  WO, 

1  OF  fiUluni\GS  PERCENT  BURNT  ( # I  4, 7X#l8HSTANDARD  DEVIATION/ 

21H  , 6  6  H I G \ I T I  0  N  ELEVATION  BURNT  (100  CASES)  BUlLDI 

3\GS)/lM  ,23X,22<1H-),3X,22(1H->,3X,22C1H«>/1H  #23X,  _  _ 

4  72HTHERPAL  SPREAD  TOTAL  THERMAL  SPREAD  TOTAL 

^thermal  spread  toTal/3,h  .24X,5hpulse,2qx,5hpulse*2QX* SHPulse/) 

K  P  G  fv  T  N  =  7 

DO  2  0  0  M  =  1 1 1 5  .  .  _ 

K=KSKIP(M) 

_ IF  (  K. s K  I P  ( M  )  ,  E Q.,.0  )__2 O._T.P__40 _ 

DO  30  L=1,K 

30  READ  INPUT  _TAPE  _1  Q  #  35 _ 

35  FORMAT  (1H  ) 

40  KSPTP  =  0  _ _ _ 

KSMSP=0 

_  DO  50  L  =  1 *  1 0  O  _  _  _ 

READ  INPUT  TAPE  10 i 45 »  KTRF (L )  i  KSPF  U  ) 

45  FORMAT  (/51X,  I  3, 47X,  _ _ _ _ _ : _ _ _ 

KSMTP=KSMTP+KTPF<L) 

50  XSMSP«KSMSP  +  KSPF(L)  _ _ _  _ _ .... 

KSM  rOT  =  KSMTP-KSMSP 

C-f-- .AVERAGE  number  OF  JUlLDINGS.,BUR.NT_FRph.  THfeRMA^PULSE  in  100  CASES _ 

AVGTP=KSMTP/100 

KAVGTPsAVGTP  _  _  _ 

IF  ( ( AVGTP-KAVGTP)-,5)  60 i 55#  55 

55  KAVGTP  =  KAVGTP  +  1  _  _  _  _  _  _ 

c----  AVERAGE  NUMBER  OF  BUILDINGS  BURNT  FROM  FIRE  SPREAD  IN  1QQ  CASES 

60  AVGSP  =  KSMSP/1Q0 _  _  _ _ _ _ _ _ 

KAVGSP=AVGSP 

IF  (  (  AVGSP-KAVGSP)".5)  70«65«65 _ _ _ 

65  KAVGSP=KAVG3P*1 

C - AVERAGE  NUMBER  OF  TOTAL  BUILDINGS  BURNT  IN  j 0 0  CASES _ 

70  KAVGTOT=KAVGTP*KAVGSP 

_RN  =  N  _ _  _ _  _  _ 

C-^--  PERCENT  OF  TOT  A L* NUMBER  OF*  BUILDINGS  WHICH  BURNT  FROM  THERMAL  PULSE 

PTP  =  AVGTP/RN*100 , _ _ 

kptp=ptp 

IF  ((PTP-KPTP)«.5)  80  »  75 1  75 _ 

75  KPTP=KPTP*1 

PERCENT  OF  TOTAL  NUMBER  OF  BUILDINGS  WHICH  BURNT  .FROM  FIRE  SPREAD 
80  PSP=AVGSP/RN*100, 

KPSPsPSP  _  _ 

IF  (  ( PSP-KPSP  )  *»  ,5)  90,85*85 

85  KPSPsKPSP^l  _ 

C -  TOTAL  PERCENT  OF  BUILDINGS  BURNT 

90  KPTCT=KP"n*KPSP _ _ _ _ 

KTOTSQTPsO 


| 
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K  T  fi  T  S  Q  b  ?  =  o  _ _ 

"C  ICO  1=1.100 
<T  =  >\7PF(1)-KaVoTP  ‘ 

KSs-vSPh  ( I  )  -KAVfibP 
*$!► ~Pk  i >=XapSF(KT> 

K  D  I  ► SP( I )=XAPSF(KS) 

KSRTP(i)sKnirTP(i)**2 
KSGSP( 1 )sKniFSP(  1  >**2 
ktctsltp=ntgtsqtp*ksctp<I) 

1.0  ktotsjsp«ktotsqsp*ksospu ) 
vyskTOTSQTP/100 
ZZ^TOTSQSP/lOC 
Y2=YY*ZZ 

C -  standard  DEVIATION  OF  BUILDINGS  BURNT  FkOM  thermal  PULSE 

DEVTP«SBRTF<YY> 

c - -  standard  DEVIATION  of  buildings  burnt  from  fire  spread 

nEVSP=SORTF<ZZ) 

C - -  STANDARD  DEVIATION  OF  ALL  BUILDINGS  BURNT 

DEVTOT  =  SQRTF  ( YZ )  _ _ 

IF  (M-5)  105,105,150 

105  KELEVSJ0  _ _ • _ 

IF  «M-2>  115,120,125 

115  RI«,1  _  _ _ _  _ _ 

GO  TO  175 

120  Rls,3  _ 

GO  TO  175 

125  IF  ( M  *■  4  )  130,135,140 _ _ _ _ 

130  R  I  =  .  5 

GO  TO  175 
135  R  I  *  ,  7 

GO  TO  175 
140  R I  =  ,  9 

G 0  TO  175 

150  IF  (M-10)  '155,155,165 
155  KEIEVUO 

IF  CM-7)  115, 120.160 
160  IF  (M-9)  130,135,140 
165  KELEV=5  * 

IF  (M-12)  115,120,170 
170  IF  (M-14)  130.135,140 
175  IF  (KPGNTN-55)  165.180,180 
180  WRITE  (6,25)~CTYl,CTY2,WINDiyWIND2,N 
KPGNTN=7 

IF  (RI-,1)  185,182,185  . .  . . " 

182  WRITE  (6,183) 

183  FORMAT  < 1 H 0  ~  '  ' 

KPGNTNsKPGNTN-^I 

~~185~WRITE~~(6,'l9orPl  .KELEV,KAVGTP,KAVGSP,KAVGTOT,KPTP,KPSP,KPTOT, - 

IDEVTPiDEVSP, DEVTOT 

”i  90  F 0 Rrt  A T~<  1 M" YF'4  ;x  ,  7  X  ,1 2 ,4 H ’DEG 75X.T4 ,  5 X  ,  1 4 , 4 X ,  1 4  ,'6  X ,  1 3‘,  5 X ,  1 3 , 5  X ,  1 3 
14X,F5,1,5X,F5 ,  1 L3X# F5 , l  [ 

KPGNTN*KPGNTN*1 
200  CONTINUE 
REWIND  27 

_  STOP _ 

END' 


REFERENCES 


X 


1.  COHN,  B.  M. ,  et  al,  "A  System  for  Local  Assessment  of  the 
Conflagration  Potential  of  Urban  Areas",  Gage-Babcock  and 
Associates,  AD  616  623 

2.  "Prediction  of  Fire  Damage  to  Installations  and  Built-Up 
Areas  from  Nuclear  Weapons",  IITRI,  July  1965 

3.  "Shelter  Fire  Vulnerability — Survey  and  Analysis  of  Repre¬ 
sentative  Buildings",  IITRI,  March  1965 

4.  CROWLEY,  J.  W.  and  STAHL,  F.  G.  ,  "The  Fire  Problem  in  Nuclear 
War",  System  Sciences,  Inc.,  December  1964 

5.  CROWLEY,  J.  W.  ,  LETTS,  M.  H.  ,  and  STAHL,  F.G.,  "Role  of  the 
Fire  Services  in  Nuclear  War",  System  Sciences,  Inc.,  April 
1965 


179 


UNCI  ASSIFIED 

Security  Clsssificstion 


DOCUMENT  CONTROL  DATA  .RAD 

(Security  clma  Milicmtio.i  of  f/fis.  body  *1  mbatr*ct  mnd  indexing  mnnotmtion  mu*t  6#  wifrtd  whmn  th»  ovtmtt  report  la  clm99itl*d) 


3  REPORT  Tl  TLI 

FIREFLY — A  COMPUTER  MODEL  TO  ASSESS  THE  EXTENT  OF  NUCLEAR  FIRE  DAMAGE 
IN  URBANIZED  AREAS 

4.  Of  iCRfPTivi  NOTES  ( Typ •  ot  rmport  mnd  inclutir •  dat9§) 

N.  A. _ 

I  »UTMO«lll  (rirtl  naiw,  mlddlt  Initial,  liilnim) 

John  W.  Crowley,  Brian  R.  Smith,  Herbert  J.  Avise,  and  Nancy  G.  Whitney 


10.  DISTRIBUTION  ST 

THIS  DOCUMENT  HAS  BEEN  APPROVED  FOR  PUBLIC  RELEASE  AND  SALE:  ITS  DIS¬ 
TRIBUTION  IS  UNLIMITED 

12.  SPONSORING  MILITARY  ACTIVITY 

Office  of  Civil  Defense 
Pentagon 

-Mimci - - Washington,  P.  C. - 


II.  SUPPLEMENT  ARY  NOTES 


S.  REPORT  DATE 

May  22,  1968 

S«.  CONTRACT  OR  GRANT  NO. 

DAHC20-67-C-0147 

b.  PROJEC  T  NO. 


e.  WORK  UNIT  NO. 
1614B 

4. 


7 A.  TOTAL  NO.  OP  PAGES  lb.  NO.  OP  REPS 

19-4 _ 1_5 _ 

M.  ORISINATOR'I  RIPORT  NUklSKR(l) 


•6.  OTHKR  report  NOdl  (Any  otfi«r  ni«Ser«  4«f  mmy  6#  matljnmd 
this  import) 


2«.  REPORT  IICURITV  CLASSIFICATION 


i  originating  activity  (Corporal*  author) 

System  Sciences,  Inc. 
4720  Montgomery  Lane 
Bethesda,  Maryland 


A  computer  model  called  FIREFLY  has  been  developed  and  written 
in  FORTRAN  IV  for  the  CDC  3600.  This  model  may  be  applied  to  obtain 
statistical  data  on  the  expected  numbers  of  buildings  destroyed  by 
fire  from  t^e  thermal  pulse  of  a  hypothetical  nuclear  weapon  and 
from  any  subsequent  urban  fire  spread.  Many  variables  concerning 
numbers  and  sizes  of  buildings,  their  construction,  and  separation 
distances  may  be  evaluated. (y) 


•tnrit;  Classification 


